object frmHistorico_Cliente: TfrmHistorico_Cliente
  Left = 458
  Top = 252
  BorderIcons = [biSystemMenu, biMaximize]
  BorderStyle = bsSingle
  Caption = ' Hist'#243'rico do Cliente'
  ClientHeight = 577
  ClientWidth = 792
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  OldCreateOrder = False
  Position = poScreenCenter
  ShowHint = True
  WindowState = wsMaximized
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 69
    Width = 792
    Height = 42
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvNone
    Color = 14081504
    TabOrder = 1
    object Label1: TLabel
      Left = 4
      Top = 1
      Width = 51
      Height = 13
      Caption = 'Entidade'
    end
    object Label2: TLabel
      Left = 388
      Top = 1
      Width = 66
      Height = 13
      Caption = 'Data Inicial'
    end
    object Label3: TLabel
      Left = 496
      Top = 1
      Width = 59
      Height = 13
      Caption = 'Data Final'
    end
    object btnC_Entidade: TSpeedButton
      Left = 64
      Top = 16
      Width = 23
      Height = 22
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = btnC_EntidadeClick
    end
    object dtIni: TDateEdit
      Left = 388
      Top = 17
      Width = 105
      Height = 21
      Ctl3D = False
      NumGlyphs = 2
      ParentCtl3D = False
      TabOrder = 1
    end
    object dtFim: TDateEdit
      Left = 496
      Top = 17
      Width = 105
      Height = 21
      Ctl3D = False
      NumGlyphs = 2
      ParentCtl3D = False
      TabOrder = 2
    end
    object edEnt: TEdit
      Left = 4
      Top = 17
      Width = 57
      Height = 21
      BevelKind = bkSoft
      BorderStyle = bsNone
      TabOrder = 0
      Text = '00000'
      OnKeyDown = edEntKeyDown
    end
    object BitBtn1: TBitBtn
      Left = 680
      Top = 9
      Width = 101
      Height = 25
      Caption = '&OK'
      TabOrder = 3
      OnClick = BitBtn1Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        555555555555555555555555555555555555555555FF55555555555559055555
        55555555577FF5555555555599905555555555557777F5555555555599905555
        555555557777FF5555555559999905555555555777777F555555559999990555
        5555557777777FF5555557990599905555555777757777F55555790555599055
        55557775555777FF5555555555599905555555555557777F5555555555559905
        555555555555777FF5555555555559905555555555555777FF55555555555579
        05555555555555777FF5555555555557905555555555555777FF555555555555
        5990555555555555577755555555555555555555555555555555}
      NumGlyphs = 2
    end
    object pnlCli: TPanel
      Left = 91
      Top = 17
      Width = 290
      Height = 21
      Alignment = taLeftJustify
      BevelInner = bvLowered
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 4
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 540
    Width = 792
    Height = 37
    Align = alBottom
    TabOrder = 2
    object btncancelar: TBitBtn
      Left = 15
      Top = 6
      Width = 138
      Height = 25
      Caption = '&Cancelar'
      TabOrder = 0
      OnClick = btncancelarClick
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333333333000033338833333333333333333F333333333333
        0000333911833333983333333388F333333F3333000033391118333911833333
        38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
        911118111118333338F3338F833338F3000033333911111111833333338F3338
        3333F8330000333333911111183333333338F333333F83330000333333311111
        8333333333338F3333383333000033333339111183333333333338F333833333
        00003333339111118333333333333833338F3333000033333911181118333333
        33338333338F333300003333911183911183333333383338F338F33300003333
        9118333911183333338F33838F338F33000033333913333391113333338FF833
        38F338F300003333333333333919333333388333338FFF830000333333333333
        3333333333333333333888330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
    object btnfechar: TBitBtn
      Left = 635
      Top = 6
      Width = 138
      Height = 25
      Caption = '&Fechar'
      TabOrder = 1
      OnClick = btnfecharClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301111111110333337F333333337F33330111111111
        0333337F333333337F333301111111110333337F333333337F33330111111111
        0333337F333333337F333301111111110333337F333333337F33330111111111
        0333337F3333333F7F333301111111B10333337F333333737F33330111111111
        0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
        0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
        0333337F377777337F333301111111110333337F333333337F33330111111111
        0333337FFFFFFFFF7F3333000000000003333377777777777333}
      NumGlyphs = 2
    end
  end
  object PageControl1: TBmsXPPageControl
    Left = 0
    Top = 111
    Width = 792
    Height = 429
    Hint = 'Clique dentro da aba selecionada para carregar as informa'#231#245'es'
    ActivePage = tbsPedPendente
    Align = alClient
    HotTrack = True
    TabOrder = 3
    object tbsPedPendente: TTabSheet
      Caption = 'Ped. Pendentes'
      OnEnter = tbsPedPendenteEnter
      object DBGrid1: TDBGrid
        Left = 0
        Top = 0
        Width = 784
        Height = 221
        Align = alClient
        DataSource = dtPed
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDblClick = DBGrid1DblClick
        OnTitleClick = DBGrid1TitleClick
        Columns = <
          item
            Expanded = False
            FieldName = 'BKP_PEDIDO'
            Title.Caption = 'Pedido n.'#186
            Width = 71
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'EMP_CODIGO'
            Title.Alignment = taCenter
            Title.Caption = 'Empresa'
            Width = 56
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_PEDCLIE'
            Title.Alignment = taCenter
            Title.Caption = 'Ped. Cli'
            Width = 80
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_PEDREPRE'
            Title.Alignment = taCenter
            Title.Caption = 'Ped. Rep.'
            Width = 78
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Divisao'
            Title.Caption = 'Divis'#227'o'
            Width = 53
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Transportadora'
            Width = 242
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Regra'
            Title.Caption = 'Regra de Pagto'
            Width = 277
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Representante'
            Title.Caption = 'Representate'
            Width = 273
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DATAPED'
            Title.Caption = 'Data do Ped.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DATACHE'
            Title.Caption = 'Data de Entrega'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_COMISREP'
            Title.Caption = 'Comiss'#227'o Rep.'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_TIPOFRETE'
            Title.Alignment = taCenter
            Title.Caption = 'Tipo de Frete'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_OBS'
            Title.Caption = 'Observa'#231#227'o do Pedido'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_VALOR'
            Title.Caption = 'Valor'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_TOTALPROD'
            Title.Caption = 'Total de Produtos'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_QTDEEMB'
            Title.Caption = 'Qtde. Emb.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_PESOLIQ'
            Title.Caption = 'Peso Liq.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_PESOBRU'
            Title.Caption = 'Peso Bruto'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_LIBERADO'
            Title.Alignment = taCenter
            Title.Caption = 'Liberado'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DESCONTO'
            Title.Caption = 'Desconto'
            Visible = True
          end>
      end
      object DBGrid2: TDBGrid
        Left = 0
        Top = 261
        Width = 784
        Height = 140
        Align = alBottom
        DataSource = dtItemPed
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDblClick = DBGrid2DblClick
        Columns = <
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_ITEM'
            Title.Alignment = taCenter
            Title.Caption = 'Item'
            Width = 31
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PRO_CODIGO'
            Title.Caption = 'Cod.Prod.'
            Width = 81
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Produto'
            Title.Caption = 'Descr. Prod.'
            Width = 272
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CF'
            Title.Alignment = taCenter
            Title.Caption = 'C.F.'
            Width = 27
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CST'
            Title.Alignment = taCenter
            Title.Caption = 'C.S.T.'
            Width = 41
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'UND'
            Title.Alignment = taCenter
            Width = 31
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_QUANTIDADE'
            Title.Alignment = taCenter
            Title.Caption = 'Quantidade'
            Width = 72
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_VALORUNIT'
            Title.Alignment = taCenter
            Title.Caption = 'Vlr. Unit.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_ALIQICMS'
            Title.Alignment = taCenter
            Title.Caption = 'Aliq. ICMS'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_ALIQIPI'
            Title.Alignment = taCenter
            Title.Caption = 'Aliq. IPI'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_PENDENTE'
            Title.Caption = 'Qtde Pendente'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'ITPV_PREVISAO'
            Title.Alignment = taCenter
            Title.Caption = 'Previs'#227'o'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC2'
            Title.Caption = 'Desc2'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC3'
            Title.Caption = 'Desc3'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC4'
            Title.Caption = 'Desc4'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC5'
            Title.Caption = 'Desc5'
            Visible = True
          end>
      end
      object Panel4: TPanel
        Left = 0
        Top = 241
        Width = 784
        Height = 20
        Align = alBottom
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Caption = 'ITENS DO PEDIDO'
        Color = 16776176
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
      end
      object Panel12: TPanel
        Left = 0
        Top = 221
        Width = 784
        Height = 20
        Align = alBottom
        BevelOuter = bvNone
        Caption = 'Panel12'
        TabOrder = 3
        object DBGrid3: TDBGrid
          Left = 100
          Top = 0
          Width = 684
          Height = 20
          TabStop = False
          Align = alRight
          Color = clInfoBk
          Ctl3D = False
          DataSource = dsDescPed
          FixedColor = clInfoBk
          Options = [dgColLines, dgMultiSelect]
          ParentCtl3D = False
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = [fsBold]
          Columns = <
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC1'
              Title.Alignment = taCenter
              Title.Caption = 'Desc1'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC2'
              Title.Alignment = taCenter
              Title.Caption = 'Desc2'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC3'
              Title.Alignment = taCenter
              Title.Caption = 'Desc3'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC4'
              Title.Alignment = taCenter
              Title.Caption = 'Desc4'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC5'
              Title.Alignment = taCenter
              Title.Caption = 'Desc5'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC6'
              Title.Alignment = taCenter
              Title.Caption = 'Desc6'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC7'
              Title.Alignment = taCenter
              Title.Caption = 'Desc7'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC8'
              Title.Alignment = taCenter
              Title.Caption = 'Desc8'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC9'
              Title.Alignment = taCenter
              Title.Caption = 'Desc9'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC10'
              Title.Alignment = taCenter
              Title.Caption = 'Desc10'
              Width = 67
              Visible = True
            end>
        end
        object Panel13: TPanel
          Left = 0
          Top = 0
          Width = 107
          Height = 20
          Align = alLeft
          BevelInner = bvLowered
          Caption = 'Descontos %'
          TabOrder = 1
        end
      end
    end
    object tbsPedFaturados: TTabSheet
      Caption = 'Ped. Faturados'
      ImageIndex = 1
      OnEnter = tbsPedFaturadosEnter
      object Panel5: TPanel
        Left = 0
        Top = 290
        Width = 784
        Height = 20
        Align = alBottom
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Caption = 'T'#205'TULOS'
        Color = 16776176
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 0
      end
      object DBGrid4: TDBGrid
        Left = 0
        Top = 310
        Width = 784
        Height = 91
        Align = alBottom
        DataSource = dtTitNota
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDrawColumnCell = DBGrid4DrawColumnCell
        OnDblClick = DBGrid4DblClick
        Columns = <
          item
            Expanded = False
            FieldName = 'TIPD_CODIGO'
            Title.Caption = 'Tp. Doc.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_NUMERO'
            Title.Caption = 'N'#250'mero'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_VALOR'
            Title.Caption = 'Valor'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_DATAVENC'
            Title.Caption = 'Vencimento'
            Width = 72
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_OBS'
            Title.Caption = 'Observa'#231#227'o'
            Width = 74
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_SALDO'
            Title.Caption = 'Saldo'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_DATAPGTO'
            Title.Caption = 'Pagamento'
            Width = 72
            Visible = True
          end>
      end
      object Panel6: TPanel
        Left = 0
        Top = 155
        Width = 784
        Height = 20
        Align = alBottom
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Caption = 'ITENS DA NOTA'
        Color = 16776176
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
      end
      object DBGrid12: TDBGrid
        Left = 0
        Top = 0
        Width = 784
        Height = 135
        Align = alClient
        DataSource = dtNota
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 3
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDblClick = DBGrid12DblClick
        OnTitleClick = DBGrid12TitleClick
        Columns = <
          item
            Expanded = False
            FieldName = 'BKP_PEDIDO'
            Title.Caption = 'Pedido n.'#186
            Width = 71
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_PEDCLIE'
            Title.Alignment = taCenter
            Title.Caption = 'Ped. Cli'
            Width = 86
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_PEDREPRE'
            Title.Alignment = taCenter
            Title.Caption = 'Ped. Repr.'
            Width = 86
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'EMP_CODIGO'
            Title.Alignment = taCenter
            Title.Caption = 'Empresa'
            Width = 56
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_DATAPED'
            Title.Alignment = taCenter
            Title.Caption = 'Data do Pedido'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_DATABASE'
            Title.Alignment = taCenter
            Title.Caption = 'Data Base'
            Width = 111
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'NOTV_DATAFAT'
            Title.Alignment = taCenter
            Title.Caption = 'Dt. Faturamento'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_TOTALPRODUTO'
            Title.Caption = 'Total de Produtos'
            Width = 108
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_VALORCONTABIL'
            Title.Caption = 'Valor Cont'#225'bil'
            Width = 89
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Divisao'
            Title.Caption = 'Divis'#227'o'
            Width = 53
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TRAN_NOME'
            Title.Caption = 'Transportadora'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'REDESPACHO'
            Title.Caption = 'Transportadora de Redespacho'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TRAN_CODIGO_REDESPACHO'
            Visible = False
          end
          item
            Expanded = False
            FieldName = 'Regra'
            Title.Caption = 'Regra de Pagto'
            Width = 277
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Representante'
            Title.Caption = 'Representate'
            Width = 273
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DATAPED'
            Title.Caption = 'Data do Ped.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_COMISREP'
            Title.Caption = 'Comiss'#227'o Rep.'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_TIPOFRETE'
            Title.Alignment = taCenter
            Title.Caption = 'Tipo de Frete'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_OBS'
            Title.Caption = 'Observa'#231#227'o do Pedido'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_QTDEEMB'
            Title.Caption = 'Qtde. Emb.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_PESOLIQ'
            Title.Caption = 'Peso Liq.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_PESOBRU'
            Title.Caption = 'Peso Bruto'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_LIBERADO'
            Title.Alignment = taCenter
            Title.Caption = 'Liberado'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DESCONTO'
            Title.Caption = 'Desconto'
            Visible = True
          end>
      end
      object DBGrid6: TDBGrid
        Left = 0
        Top = 175
        Width = 784
        Height = 115
        Align = alBottom
        DataSource = dtItemNota
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 4
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnCellClick = DBGrid6CellClick
        OnDblClick = DBGrid6DblClick
        Columns = <
          item
            Expanded = False
            FieldName = 'BKP_NUMERO'
            Title.Caption = 'Num. Nota'
            Width = 99
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'BKP_SERIE'
            Title.Alignment = taCenter
            Title.Caption = 'SR'
            Width = 30
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_ITEM'
            Title.Alignment = taCenter
            Title.Caption = 'Item'
            Width = 31
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PRO_CODIGO'
            Title.Caption = 'Cod.Prod.'
            Width = 81
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Produto'
            Title.Caption = 'Descr. Prod.'
            Width = 272
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CF'
            Title.Alignment = taCenter
            Title.Caption = 'C.F.'
            Width = 27
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CST'
            Title.Alignment = taCenter
            Title.Caption = 'C.S.T.'
            Width = 41
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'UND'
            Title.Alignment = taCenter
            Width = 31
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_QUANTIDADE'
            Title.Alignment = taCenter
            Title.Caption = 'Quantidade'
            Width = 72
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_VALORUNIT'
            Title.Alignment = taCenter
            Title.Caption = 'Vlr. Unit.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_ALIQICMS'
            Title.Alignment = taCenter
            Title.Caption = 'Aliq. ICMS'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_ALIQIPI'
            Title.Alignment = taCenter
            Title.Caption = 'Aliq. IPI'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_PENDENTE'
            Title.Caption = 'Qtde Pendente'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'ITPV_PREVISAO'
            Title.Alignment = taCenter
            Title.Caption = 'Previs'#227'o'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC2'
            Title.Caption = 'Desc2'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC3'
            Title.Caption = 'Desc3'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC4'
            Title.Caption = 'Desc4'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC5'
            Title.Caption = 'Desc5'
            Visible = True
          end>
      end
      object Panel10: TPanel
        Left = 0
        Top = 135
        Width = 784
        Height = 20
        Align = alBottom
        BevelOuter = bvNone
        TabOrder = 5
        object DBGrid13: TDBGrid
          Left = 100
          Top = 0
          Width = 684
          Height = 20
          TabStop = False
          Align = alRight
          Color = clInfoBk
          Ctl3D = False
          DataSource = dsDescNota
          FixedColor = 16311512
          Options = [dgColLines, dgMultiSelect]
          ParentCtl3D = False
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = [fsBold]
          Columns = <
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC1'
              Title.Alignment = taCenter
              Title.Caption = 'Desc1'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC2'
              Title.Alignment = taCenter
              Title.Caption = 'Desc2'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC3'
              Title.Alignment = taCenter
              Title.Caption = 'Desc3'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC4'
              Title.Alignment = taCenter
              Title.Caption = 'Desc4'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC5'
              Title.Alignment = taCenter
              Title.Caption = 'Desc5'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC6'
              Title.Alignment = taCenter
              Title.Caption = 'Desc6'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC7'
              Title.Alignment = taCenter
              Title.Caption = 'Desc7'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC8'
              Title.Alignment = taCenter
              Title.Caption = 'Desc8'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC9'
              Title.Alignment = taCenter
              Title.Caption = 'Desc9'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'PEDT_DESC10'
              Title.Alignment = taCenter
              Title.Caption = 'Desc10'
              Width = 67
              Visible = True
            end>
        end
        object Panel11: TPanel
          Left = 0
          Top = 0
          Width = 107
          Height = 20
          Align = alLeft
          BevelInner = bvLowered
          Caption = 'Descontos %'
          TabOrder = 1
        end
      end
    end
    object tbsPedAssist: TTabSheet
      Caption = 'Ped. de Assist.'
      ImageIndex = 2
      OnEnter = tbsPedAssistEnter
      object Panel9: TPanel
        Left = 0
        Top = 265
        Width = 784
        Height = 20
        Align = alBottom
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Caption = 'ITENS DO PEDIDO'
        Color = 16776176
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 0
      end
      object DBGrid5: TDBGrid
        Left = 0
        Top = 0
        Width = 784
        Height = 265
        Align = alClient
        DataSource = dtPedAss
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDblClick = DBGrid5DblClick
        OnTitleClick = DBGrid5TitleClick
        Columns = <
          item
            Expanded = False
            FieldName = 'BKP_PEDIDO'
            Title.Caption = 'Pedido n.'#186
            Width = 71
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_PEDREPRE'
            Title.Alignment = taCenter
            Title.Caption = 'Ped. Repr.'
            Width = 81
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'EMP_CODIGO'
            Title.Alignment = taCenter
            Title.Caption = 'Empresa'
            Width = 56
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Divisao'
            Title.Caption = 'Divis'#227'o'
            Width = 53
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Transportadora'
            Width = 216
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Regra'
            Title.Caption = 'Regra de Pagto'
            Width = 277
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Representante'
            Title.Caption = 'Representate'
            Width = 273
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DATAPED'
            Title.Caption = 'Data do Ped.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DATACHE'
            Title.Caption = 'Data de Chegada'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_COMISREP'
            Title.Caption = 'Comiss'#227'o Rep.'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_TIPOFRETE'
            Title.Alignment = taCenter
            Title.Caption = 'Tipo de Frete'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_OBS'
            Title.Caption = 'Observa'#231#227'o do Pedido'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_VALOR'
            Title.Caption = 'Valor'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_TOTALPROD'
            Title.Caption = 'Total de Produtos'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_QTDEEMB'
            Title.Caption = 'Qtde. Emb.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_PESOLIQ'
            Title.Caption = 'Peso Liq.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_PESOBRU'
            Title.Caption = 'Peso Bruto'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_LIBERADO'
            Title.Alignment = taCenter
            Title.Caption = 'Liberado'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DESCONTO'
            Title.Caption = 'Desconto'
            Visible = True
          end>
      end
      object DBGrid8: TDBGrid
        Left = 0
        Top = 285
        Width = 784
        Height = 116
        Align = alBottom
        DataSource = dtitemPedAss
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 2
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDblClick = DBGrid8DblClick
        Columns = <
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_ITEM'
            Title.Alignment = taCenter
            Title.Caption = 'Item'
            Width = 31
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PRO_CODIGO'
            Title.Caption = 'Cod.Prod.'
            Width = 81
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Produto'
            Title.Caption = 'Descr. Prod.'
            Width = 272
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CF'
            Title.Alignment = taCenter
            Title.Caption = 'C.F.'
            Width = 27
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CST'
            Title.Alignment = taCenter
            Title.Caption = 'C.S.T.'
            Width = 41
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'UND'
            Title.Alignment = taCenter
            Width = 31
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_QUANTIDADE'
            Title.Alignment = taCenter
            Title.Caption = 'Quantidade'
            Width = 72
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_VALORUNIT'
            Title.Alignment = taCenter
            Title.Caption = 'Vlr. Unit.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_ALIQICMS'
            Title.Alignment = taCenter
            Title.Caption = 'Aliq. ICMS'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_ALIQIPI'
            Title.Alignment = taCenter
            Title.Caption = 'Aliq. IPI'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_PENDENTE'
            Title.Caption = 'Qtde Pendente'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'ITPV_PREVISAO'
            Title.Alignment = taCenter
            Title.Caption = 'Previs'#227'o'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC2'
            Title.Caption = 'Desc2'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC3'
            Title.Caption = 'Desc3'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC4'
            Title.Caption = 'Desc4'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC5'
            Title.Caption = 'Desc5'
            Visible = True
          end>
      end
    end
    object tbsPedFatParc: TTabSheet
      Caption = 'Ped. Fat. Parcial'
      ImageIndex = 8
      OnEnter = tbsPedFatParcEnter
      object DBGrid14: TDBGrid
        Left = 0
        Top = 0
        Width = 784
        Height = 265
        Align = alClient
        DataSource = dtsPedParc
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDblClick = DBGrid14DblClick
        OnTitleClick = DBGrid5TitleClick
        Columns = <
          item
            Expanded = False
            FieldName = 'BKP_PEDIDO'
            Title.Caption = 'Pedido n.'#186
            Width = 71
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'EMP_CODIGO'
            Title.Alignment = taCenter
            Title.Caption = 'Empresa'
            Width = 56
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Divisao'
            Title.Caption = 'Divis'#227'o'
            Width = 53
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Transportadora'
            Width = 216
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Regra'
            Title.Caption = 'Regra de Pagto'
            Width = 277
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Representante'
            Title.Caption = 'Representate'
            Width = 273
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DATAPED'
            Title.Caption = 'Data do Ped.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DATACHE'
            Title.Caption = 'Data de Chegada'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_COMISREP'
            Title.Caption = 'Comiss'#227'o Rep.'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_TIPOFRETE'
            Title.Alignment = taCenter
            Title.Caption = 'Tipo de Frete'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_OBS'
            Title.Caption = 'Observa'#231#227'o do Pedido'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_VALOR'
            Title.Caption = 'Valor'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_TOTALPROD'
            Title.Caption = 'Total de Produtos'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_QTDEEMB'
            Title.Caption = 'Qtde. Emb.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_PESOLIQ'
            Title.Caption = 'Peso Liq.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_PESOBRU'
            Title.Caption = 'Peso Bruto'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_LIBERADO'
            Title.Alignment = taCenter
            Title.Caption = 'Liberado'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DESCONTO'
            Title.Caption = 'Desconto'
            Visible = True
          end>
      end
      object Panel14: TPanel
        Left = 0
        Top = 265
        Width = 784
        Height = 20
        Align = alBottom
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Caption = 'ITENS DO PEDIDO'
        Color = 16776176
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
      end
      object DBGrid18: TDBGrid
        Left = 0
        Top = 285
        Width = 784
        Height = 116
        Align = alBottom
        DataSource = dtsItemPedParc
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 2
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDblClick = DBGrid18DblClick
        Columns = <
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_ITEM'
            Title.Alignment = taCenter
            Title.Caption = 'Item'
            Width = 31
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PRO_CODIGO'
            Title.Caption = 'Cod.Prod.'
            Width = 81
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Produto'
            Title.Caption = 'Descr. Prod.'
            Width = 272
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CF'
            Title.Alignment = taCenter
            Title.Caption = 'C.F.'
            Width = 27
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CST'
            Title.Alignment = taCenter
            Title.Caption = 'C.S.T.'
            Width = 41
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'UND'
            Title.Alignment = taCenter
            Width = 31
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_QUANTIDADE'
            Title.Alignment = taCenter
            Title.Caption = 'Quantidade'
            Width = 72
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_VALORUNIT'
            Title.Alignment = taCenter
            Title.Caption = 'Vlr. Unit.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_ALIQICMS'
            Title.Alignment = taCenter
            Title.Caption = 'Aliq. ICMS'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_ALIQIPI'
            Title.Alignment = taCenter
            Title.Caption = 'Aliq. IPI'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_PENDENTE'
            Title.Caption = 'Qtde Pendente'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'ITPV_PREVISAO'
            Title.Alignment = taCenter
            Title.Caption = 'Previs'#227'o'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC2'
            Title.Caption = 'Desc2'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC3'
            Title.Caption = 'Desc3'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC4'
            Title.Caption = 'Desc4'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC5'
            Title.Caption = 'Desc5'
            Visible = True
          end>
      end
    end
    object tbsPedCancelado: TTabSheet
      Caption = 'Ped. Cancelados'
      ImageIndex = 9
      OnEnter = tbsPedCanceladoEnter
      object DBGrid19: TDBGrid
        Left = 0
        Top = 0
        Width = 784
        Height = 265
        Align = alClient
        DataSource = dtsPedCanc
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDblClick = DBGrid19DblClick
        OnTitleClick = DBGrid5TitleClick
        Columns = <
          item
            Expanded = False
            FieldName = 'BKP_PEDIDO'
            Title.Caption = 'Pedido n.'#186
            Width = 71
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'EMP_CODIGO'
            Title.Alignment = taCenter
            Title.Caption = 'Empresa'
            Width = 56
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Motivo'
            Width = 233
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Divisao'
            Title.Caption = 'Divis'#227'o'
            Width = 53
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Transportadora'
            Width = 216
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Regra'
            Title.Caption = 'Regra de Pagto'
            Width = 277
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Representante'
            Title.Caption = 'Representate'
            Width = 273
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DATAPED'
            Title.Caption = 'Data do Ped.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DATACHE'
            Title.Caption = 'Data de Chegada'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_COMISREP'
            Title.Caption = 'Comiss'#227'o Rep.'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_TIPOFRETE'
            Title.Alignment = taCenter
            Title.Caption = 'Tipo de Frete'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_OBS'
            Title.Caption = 'Observa'#231#227'o do Pedido'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_VALOR'
            Title.Caption = 'Valor'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_TOTALPROD'
            Title.Caption = 'Total de Produtos'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_QTDEEMB'
            Title.Caption = 'Qtde. Emb.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_PESOLIQ'
            Title.Caption = 'Peso Liq.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_PESOBRU'
            Title.Caption = 'Peso Bruto'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_LIBERADO'
            Title.Alignment = taCenter
            Title.Caption = 'Liberado'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DESCONTO'
            Title.Caption = 'Desconto'
            Visible = True
          end>
      end
      object Panel18: TPanel
        Left = 0
        Top = 265
        Width = 784
        Height = 20
        Align = alBottom
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Caption = 'ITENS DO PEDIDO'
        Color = 16776176
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
      end
      object DBGrid20: TDBGrid
        Left = 0
        Top = 285
        Width = 784
        Height = 116
        Align = alBottom
        DataSource = dtsItemPedCanc
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 2
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDblClick = DBGrid20DblClick
        Columns = <
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_ITEM'
            Title.Alignment = taCenter
            Title.Caption = 'Item'
            Width = 31
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PRO_CODIGO'
            Title.Caption = 'Cod.Prod.'
            Width = 81
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Produto'
            Title.Caption = 'Descr. Prod.'
            Width = 272
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CF'
            Title.Alignment = taCenter
            Title.Caption = 'C.F.'
            Width = 27
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CST'
            Title.Alignment = taCenter
            Title.Caption = 'C.S.T.'
            Width = 41
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'UND'
            Title.Alignment = taCenter
            Width = 31
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_QUANTIDADE'
            Title.Alignment = taCenter
            Title.Caption = 'Quantidade'
            Width = 72
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_VALORUNIT'
            Title.Alignment = taCenter
            Title.Caption = 'Vlr. Unit.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_ALIQICMS'
            Title.Alignment = taCenter
            Title.Caption = 'Aliq. ICMS'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_ALIQIPI'
            Title.Alignment = taCenter
            Title.Caption = 'Aliq. IPI'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_PENDENTE'
            Title.Caption = 'Qtde Pendente'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'ITPV_PREVISAO'
            Title.Alignment = taCenter
            Title.Caption = 'Previs'#227'o'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC2'
            Title.Caption = 'Desc2'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC3'
            Title.Caption = 'Desc3'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC4'
            Title.Caption = 'Desc4'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC5'
            Title.Caption = 'Desc5'
            Visible = True
          end>
      end
    end
    object tbsNotasAssist: TTabSheet
      Caption = 'Notas de Assist.'
      ImageIndex = 3
      OnEnter = tbsNotasAssistEnter
      object Panel7: TPanel
        Left = 0
        Top = 147
        Width = 784
        Height = 20
        Align = alTop
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Caption = 'ITENS DA NOTA'
        Color = 16776176
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 0
      end
      object Panel8: TPanel
        Left = 0
        Top = 281
        Width = 784
        Height = 20
        Align = alTop
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Caption = 'T'#205'TULOS'
        Color = 16776176
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
      end
      object DBGrid9: TDBGrid
        Left = 0
        Top = 0
        Width = 784
        Height = 147
        Align = alTop
        DataSource = dtNotaAss
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 2
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDblClick = DBGrid9DblClick
        OnTitleClick = DBGrid9TitleClick
        Columns = <
          item
            Expanded = False
            FieldName = 'BKP_PEDIDO'
            Title.Caption = 'Pedido n.'#186
            Width = 71
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_PEDREPRE'
            Title.Alignment = taCenter
            Title.Caption = 'Ped. Repr.'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'EMP_CODIGO'
            Title.Alignment = taCenter
            Title.Caption = 'Empresa'
            Width = 56
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Divisao'
            Title.Caption = 'Divis'#227'o'
            Width = 53
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Transportadora'
            Width = 227
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Regra'
            Title.Caption = 'Regra de Pagto'
            Width = 277
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Representante'
            Title.Caption = 'Representate'
            Width = 273
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DATAPED'
            Title.Caption = 'Data do Ped.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DATACHE'
            Title.Caption = 'Data de Chegada'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'DTFAT'
            Title.Alignment = taCenter
            Title.Caption = 'Data Fat.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_COMISREP'
            Title.Caption = 'Comiss'#227'o Rep.'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_TIPOFRETE'
            Title.Alignment = taCenter
            Title.Caption = 'Tipo de Frete'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_OBS'
            Title.Caption = 'Observa'#231#227'o do Pedido'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_VALOR'
            Title.Caption = 'Valor'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_TOTALPROD'
            Title.Caption = 'Total de Produtos'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_QTDEEMB'
            Title.Caption = 'Qtde. Emb.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_PESOLIQ'
            Title.Caption = 'Peso Liq.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_PESOBRU'
            Title.Caption = 'Peso Bruto'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_LIBERADO'
            Title.Alignment = taCenter
            Title.Caption = 'Liberado'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PED_DESCONTO'
            Title.Caption = 'Desconto'
            Visible = True
          end>
      end
      object DBGrid7: TDBGrid
        Left = 0
        Top = 301
        Width = 784
        Height = 100
        Align = alClient
        DataSource = dtTitAss
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 3
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDrawColumnCell = DBGrid7DrawColumnCell
        OnDblClick = DBGrid7DblClick
        Columns = <
          item
            Expanded = False
            FieldName = 'TIPD_CODIGO'
            Title.Caption = 'Tp. Doc.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_NUMERO'
            Title.Caption = 'N'#250'mero'
            Width = 92
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_VALOR'
            Title.Caption = 'Valor'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_DATAVENC'
            Title.Caption = 'Vencimento'
            Width = 76
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_OBS'
            Title.Caption = 'Observa'#231#227'o'
            Width = 288
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_SALDO'
            Title.Caption = 'Saldo'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_DATAPGTO'
            Title.Caption = 'Pagamento'
            Width = 85
            Visible = True
          end>
      end
      object DBGrid10: TDBGrid
        Left = 0
        Top = 167
        Width = 784
        Height = 114
        Align = alTop
        DataSource = dtItemNotaAss
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 4
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDblClick = DBGrid10DblClick
        Columns = <
          item
            Expanded = False
            FieldName = 'BKP_NUMERO'
            Title.Caption = 'Num. Nota'
            Width = 99
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'BKP_SERIE'
            Title.Alignment = taCenter
            Title.Caption = 'SR'
            Width = 30
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PED_ITEM'
            Title.Alignment = taCenter
            Title.Caption = 'Item'
            Width = 31
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PRO_CODIGO'
            Title.Caption = 'Cod.Prod.'
            Width = 81
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Produto'
            Title.Caption = 'Descr. Prod.'
            Width = 272
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CF'
            Title.Alignment = taCenter
            Title.Caption = 'C.F.'
            Width = 27
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CST'
            Title.Alignment = taCenter
            Title.Caption = 'C.S.T.'
            Width = 41
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'UND'
            Title.Alignment = taCenter
            Width = 31
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_QUANTIDADE'
            Title.Alignment = taCenter
            Title.Caption = 'Quantidade'
            Width = 72
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_VALORUNIT'
            Title.Alignment = taCenter
            Title.Caption = 'Vlr. Unit.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_ALIQICMS'
            Title.Alignment = taCenter
            Title.Caption = 'Aliq. ICMS'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_ALIQIPI'
            Title.Alignment = taCenter
            Title.Caption = 'Aliq. IPI'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_PENDENTE'
            Title.Caption = 'Qtde Pendente'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'ITPV_PREVISAO'
            Title.Alignment = taCenter
            Title.Caption = 'Previs'#227'o'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC2'
            Title.Caption = 'Desc2'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC3'
            Title.Caption = 'Desc3'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC4'
            Title.Caption = 'Desc4'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITPV_DESC5'
            Title.Caption = 'Desc5'
            Visible = True
          end>
      end
    end
    object tbsTitulos: TTabSheet
      Caption = 'T'#237'tulos'
      ImageIndex = 4
      OnEnter = tbsTitulosEnter
      OnMouseUp = tbsTitulosMouseUp
      object Label7: TLabel
        Left = 42
        Top = 265
        Width = 71
        Height = 13
        Caption = 'N'#186' do T'#237'tulo'
        Transparent = True
      end
      object Label8: TLabel
        Left = 470
        Top = 265
        Width = 47
        Height = 13
        Caption = 'Emiss'#227'o'
        Transparent = True
      end
      object Label9: TLabel
        Left = 487
        Top = 329
        Width = 30
        Height = 13
        Caption = 'Valor'
        Transparent = True
      end
      object Label10: TLabel
        Left = 51
        Top = 345
        Width = 62
        Height = 13
        Caption = 'Local Cob.'
        Transparent = True
      end
      object Label11: TLabel
        Left = 25
        Top = 361
        Width = 88
        Height = 13
        Caption = 'Sub-Local Cob.'
        Transparent = True
      end
      object Label12: TLabel
        Left = 62
        Top = 329
        Width = 51
        Height = 13
        Caption = 'Hist'#243'rico'
        Transparent = True
      end
      object Label24: TLabel
        Left = 450
        Top = 281
        Width = 67
        Height = 13
        Caption = 'Vencimento'
        Transparent = True
      end
      object Label16: TLabel
        Left = 478
        Top = 313
        Width = 39
        Height = 13
        Caption = 'Moeda'
        Transparent = True
      end
      object Label22: TLabel
        Left = 27
        Top = 297
        Width = 86
        Height = 13
        Caption = 'Base Comiss'#227'o'
        Transparent = True
      end
      object Label33: TLabel
        Left = 29
        Top = 313
        Width = 84
        Height = 13
        Caption = 'Representante'
        Transparent = True
      end
      object Label37: TLabel
        Left = 436
        Top = 297
        Width = 81
        Height = 13
        Caption = 'Venc. Original'
        Transparent = True
      end
      object Label13: TLabel
        Left = 453
        Top = 345
        Width = 64
        Height = 13
        Caption = 'Pagamento'
        Transparent = True
      end
      object Label14: TLabel
        Left = 50
        Top = 281
        Width = 63
        Height = 13
        Caption = 'Tipo Venc.'
        Transparent = True
      end
      object Label15: TLabel
        Left = 457
        Top = 361
        Width = 61
        Height = 13
        Caption = 'Valor Doc.'
        Transparent = True
        Visible = False
      end
      object DBText1: TDBText
        Left = 118
        Top = 265
        Width = 50
        Height = 13
        AutoSize = True
        DataField = 'TITC_NUMERO'
        DataSource = dtTit
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText3: TDBText
        Left = 118
        Top = 297
        Width = 50
        Height = 13
        AutoSize = True
        DataField = 'TITC_BCCOMIS'
        DataSource = dtTit
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText4: TDBText
        Left = 118
        Top = 313
        Width = 50
        Height = 13
        AutoSize = True
        DataField = 'REP_CODIGO'
        DataSource = dtTit
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText5: TDBText
        Left = 118
        Top = 329
        Width = 50
        Height = 13
        AutoSize = True
        DataField = 'HIST_CODIGO'
        DataSource = dtTit
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText6: TDBText
        Left = 118
        Top = 345
        Width = 50
        Height = 13
        AutoSize = True
        DataField = 'LOCAL_CODIGO'
        DataSource = dtTit
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText7: TDBText
        Left = 118
        Top = 361
        Width = 50
        Height = 13
        AutoSize = True
        DataField = 'SUBL_CODIGO'
        DataSource = dtTit
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText8: TDBText
        Left = 521
        Top = 265
        Width = 50
        Height = 13
        AutoSize = True
        DataField = 'TITC_DATAEMIS'
        DataSource = dtTit
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText9: TDBText
        Left = 521
        Top = 281
        Width = 50
        Height = 13
        AutoSize = True
        DataField = 'TITC_DATAVENC'
        DataSource = dtTit
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText10: TDBText
        Left = 521
        Top = 297
        Width = 57
        Height = 13
        AutoSize = True
        Color = clBtnFace
        DataField = 'TITC_VENCORIG'
        DataSource = dtTit
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        Transparent = True
      end
      object DBText11: TDBText
        Left = 521
        Top = 313
        Width = 57
        Height = 13
        AutoSize = True
        DataField = 'MOE_CODIGO'
        DataSource = dtTit
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText12: TDBText
        Left = 521
        Top = 329
        Width = 57
        Height = 13
        AutoSize = True
        DataField = 'TITC_VALOR'
        DataSource = dtTit
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText13: TDBText
        Left = 521
        Top = 345
        Width = 57
        Height = 13
        AutoSize = True
        DataField = 'TITC_DATAPGTO'
        DataSource = dtTit
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText14: TDBText
        Left = 521
        Top = 361
        Width = 57
        Height = 13
        AutoSize = True
        DataField = 'TITC_SALDO'
        DataSource = dtTit
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
        Visible = False
      end
      object lblRep: TLabel
        Left = 148
        Top = 313
        Width = 37
        Height = 13
        Caption = 'lblRep'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblHist: TLabel
        Left = 172
        Top = 329
        Width = 51
        Height = 13
        Caption = 'Historico'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblLocal: TLabel
        Left = 144
        Top = 345
        Width = 32
        Height = 13
        Caption = 'Local'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblSub: TLabel
        Left = 144
        Top = 361
        Width = 23
        Height = 13
        Caption = 'Sub'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblMoeda: TLabel
        Left = 558
        Top = 313
        Width = 39
        Height = 13
        Caption = 'Moeda'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lbltipovenc: TLabel
        Left = 118
        Top = 281
        Width = 30
        Height = 13
        Caption = 'Venc'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label58: TLabel
        Left = 36
        Top = 377
        Width = 75
        Height = 13
        Caption = 'Observa'#231#245'es'
        Transparent = True
      end
      object DBGrid11: TDBGrid
        Left = 0
        Top = 0
        Width = 784
        Height = 263
        Align = alTop
        Color = clWhite
        DataSource = dtTit
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        PopupMenu = ppMenuExporta
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnCellClick = DBGrid11CellClick
        OnColEnter = DBGrid11ColEnter
        OnDrawColumnCell = DBGrid11DrawColumnCell
        OnDblClick = DBGrid11DblClick
        OnExit = DBGrid11Exit
        OnTitleClick = DBGrid11TitleClick
        Columns = <
          item
            Expanded = False
            FieldName = 'TIPD_CODIGO'
            Title.Caption = 'TD'
            Width = 30
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_NUMERO'
            Title.Caption = 'N'#250'mero'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_DATAVENC'
            Title.Caption = 'Vencimento'
            Width = 73
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'PZDIAS'
            Title.Alignment = taCenter
            Title.Caption = 'Dias em Atrazo'
            Width = 95
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'BKP_NUMERO'
            Title.Caption = 'Nota'
            Width = 109
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'BKP_SERIE'
            Title.Caption = 'S'#233'rie'
            Width = 40
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'EMP_CODIGO'
            Title.Caption = 'Empresa'
            Width = 56
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_NOSSONUM'
            Title.Caption = 'Nosso N'#250'mero'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_VALOR'
            Title.Caption = 'Valor'
            Width = 85
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_SALDO'
            Title.Caption = 'Saldo'
            Width = 89
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'BORD_NUMERO'
            Title.Caption = 'N.'#186' Bord.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_OBS'
            Title.Caption = 'Obs'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_NUMBLOQ'
            Title.Caption = 'N.'#186' Bloqueto'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_VALOR'
            Title.Caption = 'Valor'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_SALDO'
            Title.Caption = 'Saldo'
            Visible = True
          end>
      end
      object pnlLegenda: TPanel
        Left = 647
        Top = 266
        Width = 133
        Height = 106
        BevelInner = bvLowered
        TabOrder = 1
        object l1: TLabel
          Left = 30
          Top = 38
          Width = 80
          Height = 13
          Cursor = crHandPoint
          Caption = 'T'#237'tulos Pagos'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold, fsUnderline]
          ParentFont = False
          OnClick = l1Click
        end
        object l2: TLabel
          Left = 30
          Top = 61
          Width = 89
          Height = 13
          Cursor = crHandPoint
          Caption = 'T'#237'tulos a Pagar'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold, fsUnderline]
          ParentFont = False
          OnClick = l2Click
        end
        object l3: TLabel
          Left = 30
          Top = 84
          Width = 97
          Height = 13
          Cursor = crHandPoint
          Caption = 'T'#237'tulos Vencidos'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold, fsUnderline]
          ParentFont = False
          Transparent = True
          OnClick = l3Click
        end
        object Label55: TLabel
          Left = 13
          Top = 6
          Width = 59
          Height = 13
          Caption = 'LEGENDA'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Bevel6: TBevel
          Left = 1
          Top = 24
          Width = 130
          Height = 2
        end
        object Shape1: TShape
          Left = 10
          Top = 82
          Width = 17
          Height = 17
          Brush.Color = clRed
        end
        object Label52: TLabel
          Left = 14
          Top = 84
          Width = 9
          Height = 13
          Caption = 'T'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          Transparent = True
        end
        object Shape2: TShape
          Left = 10
          Top = 59
          Width = 17
          Height = 17
        end
        object Label53: TLabel
          Left = 14
          Top = 61
          Width = 9
          Height = 13
          Caption = 'T'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clRed
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          Transparent = True
        end
        object Shape3: TShape
          Left = 10
          Top = 36
          Width = 17
          Height = 17
        end
        object Label54: TLabel
          Left = 14
          Top = 38
          Width = 9
          Height = 13
          Caption = 'T'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clGreen
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          Transparent = True
        end
        object Label57: TLabel
          Left = 98
          Top = 6
          Width = 30
          Height = 13
          Cursor = crHandPoint
          Alignment = taRightJustify
          Caption = 'Todos'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsUnderline]
          ParentFont = False
          OnClick = Label57Click
        end
      end
      object DBMemo2: TDBMemo
        Left = 118
        Top = 376
        Width = 657
        Height = 25
        BevelInner = bvNone
        BevelOuter = bvNone
        BorderStyle = bsNone
        DataField = 'TITC_OBS0'
        DataSource = dtTit
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        ScrollBars = ssVertical
        TabOrder = 2
      end
    end
    object TabSheet6: TTabSheet
      Caption = 'Ficha Resum. do Cliente'
      ImageIndex = 5
      object Bevel5: TBevel
        Left = 132
        Top = 268
        Width = 273
        Height = 85
        Shape = bsFrame
      end
      object Bevel4: TBevel
        Left = 412
        Top = 208
        Width = 289
        Height = 144
        Shape = bsFrame
      end
      object Bevel3: TBevel
        Left = 132
        Top = 148
        Width = 273
        Height = 113
        Shape = bsFrame
      end
      object Bevel2: TBevel
        Left = 412
        Top = 60
        Width = 289
        Height = 141
        Shape = bsFrame
      end
      object Bevel1: TBevel
        Left = 132
        Top = 60
        Width = 273
        Height = 81
        Shape = bsFrame
      end
      object Label17: TLabel
        Left = 459
        Top = 99
        Width = 93
        Height = 16
        Caption = 'N'#186' T'#237't. Pagos'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblNum_tit_pago: TLabel
        Left = 556
        Top = 100
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label18: TLabel
        Left = 465
        Top = 79
        Width = 87
        Height = 16
        Caption = 'Total D'#233'bito'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblTotal_Debito: TLabel
        Left = 556
        Top = 80
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label19: TLabel
        Left = 435
        Top = 119
        Width = 117
        Height = 16
        Caption = 'T'#237'tulos Vencidos'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblTitulos_Vencidos: TLabel
        Left = 556
        Top = 120
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label20: TLabel
        Left = 438
        Top = 140
        Width = 114
        Height = 16
        Caption = 'T'#237'tulos a Vencer'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblTitulos_A_Vencer: TLabel
        Left = 556
        Top = 140
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label21: TLabel
        Left = 422
        Top = 160
        Width = 130
        Height = 16
        Caption = #218'ltimo Vencimento'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblUlt_vencimento: TLabel
        Left = 556
        Top = 160
        Width = 64
        Height = 16
        Caption = '99/99/9999'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label23: TLabel
        Left = 430
        Top = 225
        Width = 123
        Height = 16
        Caption = 'Data de Cadastro'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblData_cadastro: TLabel
        Left = 556
        Top = 225
        Width = 64
        Height = 16
        Caption = '99/99/9999'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label25: TLabel
        Left = 159
        Top = 156
        Width = 106
        Height = 16
        Caption = 'N'#186' de Compras'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblNum_compras: TLabel
        Left = 271
        Top = 156
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label26: TLabel
        Left = 150
        Top = 176
        Width = 115
        Height = 16
        Caption = 'Primeira compra'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label27: TLabel
        Left = 162
        Top = 196
        Width = 103
        Height = 16
        Caption = #218'ltima Compra'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label28: TLabel
        Left = 167
        Top = 216
        Width = 98
        Height = 16
        Caption = 'Maior Compra'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblPrimeira_compra: TLabel
        Left = 271
        Top = 176
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblUltima_Compra: TLabel
        Left = 271
        Top = 196
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblMaior_compra: TLabel
        Left = 271
        Top = 216
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label29: TLabel
        Left = 154
        Top = 272
        Width = 113
        Height = 16
        Caption = 'Pedidos  Aberto'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label30: TLabel
        Left = 200
        Top = 292
        Width = 67
        Height = 16
        Caption = 'Protestos'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblPedidos_Aberto: TLabel
        Left = 271
        Top = 272
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblProtestos: TLabel
        Left = 271
        Top = 292
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label31: TLabel
        Left = 462
        Top = 245
        Width = 91
        Height = 16
        Caption = 'Limite Venda'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblLimiteVenda: TLabel
        Left = 556
        Top = 245
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label32: TLabel
        Left = 465
        Top = 289
        Width = 88
        Height = 16
        Caption = 'Assiduidade'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblAssiduidade: TLabel
        Left = 556
        Top = 289
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label34: TLabel
        Left = 471
        Top = 309
        Width = 82
        Height = 16
        Caption = 'Mix Produto'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblMix_produto: TLabel
        Left = 556
        Top = 309
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label35: TLabel
        Left = 445
        Top = 329
        Width = 108
        Height = 16
        Caption = 'M'#233'dia Faturam.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblMedia_Faturamento: TLabel
        Left = 556
        Top = 329
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label36: TLabel
        Left = 152
        Top = 312
        Width = 115
        Height = 16
        Caption = 'Juros/Despesas'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblJuros_Despesas: TLabel
        Left = 271
        Top = 312
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label38: TLabel
        Left = 141
        Top = 332
        Width = 126
        Height = 16
        Caption = 'Cheque s/ Fundos'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblCheque_Fundos: TLabel
        Left = 271
        Top = 332
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label39: TLabel
        Left = 172
        Top = 72
        Width = 93
        Height = 16
        Caption = 'M'#233'dia Atraso'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblMedia_atraso: TLabel
        Left = 270
        Top = 72
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label40: TLabel
        Left = 176
        Top = 92
        Width = 89
        Height = 16
        Caption = 'Maior Atraso'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblMaior_Atraso: TLabel
        Left = 270
        Top = 92
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label41: TLabel
        Left = 144
        Top = 112
        Width = 121
        Height = 16
        Caption = 'T'#237't. Pagos Atraso'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblTit_pagos_atraso: TLabel
        Left = 270
        Top = 112
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label42: TLabel
        Left = 138
        Top = 236
        Width = 127
        Height = 16
        Caption = 'N'#186' de Devolu'#231#245'es'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblNum_Devolucoes: TLabel
        Left = 271
        Top = 236
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label43: TLabel
        Left = 519
        Top = 180
        Width = 33
        Height = 13
        Caption = 'Saldo'
        Transparent = True
      end
      object lblsaldo: TLabel
        Left = 556
        Top = 179
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clNavy
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblperc_aberto: TLabel
        Left = 625
        Top = 179
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clNavy
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label56: TLabel
        Left = 511
        Top = 269
        Width = 42
        Height = 16
        Alignment = taRightJustify
        Caption = 'Saldo'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object lblSaldoLimite: TLabel
        Left = 556
        Top = 269
        Width = 7
        Height = 16
        Caption = '0'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
    end
    object TabSheet7: TTabSheet
      Caption = 'Inf. do Cliente'
      ImageIndex = 6
      object DBText2: TDBText
        Left = 128
        Top = 8
        Width = 50
        Height = 13
        AutoSize = True
        DataField = 'ENT_CNPJ'
        DataSource = dsEntidade
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText15: TDBText
        Left = 128
        Top = 32
        Width = 57
        Height = 13
        AutoSize = True
        DataField = 'ENT_CPF'
        DataSource = dsEntidade
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText16: TDBText
        Left = 128
        Top = 56
        Width = 57
        Height = 13
        AutoSize = True
        DataField = 'REP_CODIGO'
        DataSource = dsEntidade
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText17: TDBText
        Left = 128
        Top = 80
        Width = 57
        Height = 13
        AutoSize = True
        DataField = 'ENT_EMAIL'
        DataSource = dsEntidade
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText19: TDBText
        Left = 128
        Top = 104
        Width = 57
        Height = 13
        AutoSize = True
        DataField = 'ENT_NASC'
        DataSource = dsEntidade
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText20: TDBText
        Left = 508
        Top = 80
        Width = 57
        Height = 13
        AutoSize = True
        DataField = 'EST_SIGLA'
        DataSource = dsEndereco
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText21: TDBText
        Left = 508
        Top = 56
        Width = 57
        Height = 13
        AutoSize = True
        DataField = 'CID_NOME'
        DataSource = dsEndereco
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText22: TDBText
        Left = 508
        Top = 8
        Width = 57
        Height = 13
        AutoSize = True
        DataField = 'END_ENDERECO'
        DataSource = dsEndereco
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label5: TLabel
        Left = 92
        Top = 8
        Width = 32
        Height = 13
        Caption = 'CNPJ'
        Transparent = True
      end
      object Label6: TLabel
        Left = 100
        Top = 32
        Width = 24
        Height = 13
        Caption = 'CPF'
        Transparent = True
      end
      object Label44: TLabel
        Left = 40
        Top = 56
        Width = 84
        Height = 13
        Caption = 'Representante'
        Transparent = True
      end
      object DBText18: TDBText
        Left = 156
        Top = 56
        Width = 57
        Height = 13
        AutoSize = True
        DataField = 'Representante'
        DataSource = dsEntidade
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label45: TLabel
        Left = 93
        Top = 80
        Width = 31
        Height = 13
        Caption = 'Email'
        Transparent = True
      end
      object Label46: TLabel
        Left = 41
        Top = 104
        Width = 83
        Height = 13
        Caption = 'Data de Nasc.'
        Transparent = True
      end
      object Label47: TLabel
        Left = 49
        Top = 128
        Width = 75
        Height = 13
        Caption = 'Observa'#231#245'es'
        Transparent = True
      end
      object Label48: TLabel
        Left = 464
        Top = 56
        Width = 40
        Height = 13
        Caption = 'Cidade'
        Transparent = True
      end
      object Label49: TLabel
        Left = 449
        Top = 8
        Width = 55
        Height = 13
        Caption = 'Endere'#231'o'
        Transparent = True
      end
      object Label50: TLabel
        Left = 487
        Top = 80
        Width = 17
        Height = 13
        Caption = 'UF'
        Transparent = True
      end
      object Label51: TLabel
        Left = 453
        Top = 32
        Width = 51
        Height = 13
        Caption = 'Telefone'
        Transparent = True
      end
      object DBText23: TDBText
        Left = 533
        Top = 32
        Width = 57
        Height = 13
        AutoSize = True
        DataField = 'END_FONE'
        DataSource = dsEndereco
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBText24: TDBText
        Left = 508
        Top = 32
        Width = 26
        Height = 13
        DataField = 'CID_DDD'
        DataSource = dsEndereco
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object DBMemo1: TDBMemo
        Left = 128
        Top = 129
        Width = 589
        Height = 89
        TabStop = False
        BevelKind = bkFlat
        BorderStyle = bsNone
        Color = clWhite
        DataField = 'ENT_OBSERVACAO'
        DataSource = dsEntidade
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        ReadOnly = True
        TabOrder = 0
      end
    end
    object tbsNFCliente: TTabSheet
      Caption = 'Notas do Cliente'
      ImageIndex = 7
      OnEnter = tbsNFClienteEnter
      object Panel19: TPanel
        Left = 0
        Top = 155
        Width = 784
        Height = 20
        Align = alBottom
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Caption = 'ITENS DA NOTA'
        Color = 16776176
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 0
      end
      object DBGrid16: TDBGrid
        Left = 0
        Top = 175
        Width = 784
        Height = 115
        Align = alBottom
        DataSource = dsItNF
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnCellClick = DBGrid16CellClick
        OnDblClick = DBGrid16DblClick
        OnKeyUp = DBGrid16KeyUp
        Columns = <
          item
            Expanded = False
            FieldName = 'BKP_PEDIDO'
            Title.Caption = 'Pedido'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PRO_CODIGO'
            Title.Caption = 'Cod. Prod.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'produto'
            Title.Caption = 'Descr. prod'
            Width = 272
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CF'
            Title.Alignment = taCenter
            Title.Caption = 'C.F.'
            Width = 28
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CST'
            Title.Alignment = taCenter
            Title.Caption = 'C.S.T.'
            Width = 46
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'UND'
            Title.Alignment = taCenter
            Width = 33
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_ITEM'
            Title.Caption = 'Item'
            Width = 32
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_QUANTIDADE'
            Title.Caption = 'Quantidade'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_VALORUNIT'
            Title.Caption = 'Vlr. unit.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_CUSTOMEDIO'
            Title.Caption = 'Custo M'#233'dio'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_DESC2'
            Title.Caption = 'Desc2'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_DESC3'
            Title.Caption = 'Desc3'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_DESC4'
            Title.Caption = 'Desc4'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_DESC5'
            Title.Caption = 'Desc5'
            Visible = True
          end>
      end
      object Panel20: TPanel
        Left = 0
        Top = 290
        Width = 784
        Height = 20
        Align = alBottom
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Caption = 'T'#205'TULOS'
        Color = 16776176
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
      end
      object DBGrid17: TDBGrid
        Left = 0
        Top = 310
        Width = 784
        Height = 91
        Align = alBottom
        DataSource = dsTitNF
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 3
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDrawColumnCell = DBGrid17DrawColumnCell
        OnDblClick = DBGrid17DblClick
        Columns = <
          item
            Expanded = False
            FieldName = 'TIPD_CODIGO'
            Title.Caption = 'Tp. Doc.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_NUMERO'
            Title.Caption = 'N'#250'mero'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_VALOR'
            Title.Caption = 'Valor'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_DATAVENC'
            Title.Caption = 'Vencimento'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_OBS'
            Title.Caption = 'Observa'#231#227'o'
            Width = 79
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TITC_SALDO'
            Title.Caption = 'Saldo'
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'TITC_DATAPGTO'
            Title.Alignment = taCenter
            Title.Caption = 'Pagamento'
            Visible = True
          end>
      end
      object DBGrid15: TDBGrid
        Left = 0
        Top = 0
        Width = 784
        Height = 155
        Align = alClient
        DataSource = dsNF
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 4
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnCellClick = DBGrid15CellClick
        OnDblClick = DBGrid15DblClick
        OnKeyUp = DBGrid15KeyUp
        OnTitleClick = DBGrid15TitleClick
        Columns = <
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'BKP_NUMERO'
            Title.Alignment = taCenter
            Title.Caption = 'Nota'
            Width = 76
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'NOTA_SERIE'
            Title.Alignment = taCenter
            Title.Caption = 'Serie'
            Width = 39
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'EMP_CODIGO'
            Title.Alignment = taCenter
            Title.Caption = 'Emp'
            Width = 32
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TRAN_NOME'
            Title.Caption = 'Transportadora'
            Width = 282
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'HIST_CODIGO'
            Title.Alignment = taCenter
            Title.Caption = 'Hist'#243'rico'
            Width = 60
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_VALORCONTABIL'
            Title.Caption = 'Valor Cont'#225'bil'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_DATAFAT'
            Title.Caption = 'Data Fat.'
            Width = 80
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Representante'
            Title.Caption = 'Representate'
            Width = 273
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'MOE_CODIGO'
            Title.Caption = 'Moeda'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Divisao'
            Title.Caption = 'Divis'#227'o'
            Width = 53
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'CONF_CODIGO'
            Title.Caption = 'Cond. Fat'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'CODF_CODIGO'
            Title.Caption = 'Cod. Fiscal'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NATO_CODIGO'
            Title.Caption = 'Natureza'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'REG_CODIGO'
            Title.Caption = 'Regi'#227'o'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_OBSERVACAO'
            Title.Caption = 'Observa'#231#227'o'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_FRETE'
            Title.Caption = 'Frete'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_SEGURO'
            Title.Caption = 'Seguro'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_IPI'
            Title.Caption = 'IPI'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_ICMS'
            Title.Caption = 'ICMS'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_DATAENTRADA'
            Title.Caption = 'Data Entr.'
            Visible = True
          end
          item
            Expanded = False
            Visible = True
          end>
      end
    end
    object tbsSerasa: TTabSheet
      Caption = 'SERASA'
      ImageIndex = 10
      OnEnter = tbsSerasaEnter
      object ATLabel1: TATLabel
        Left = 0
        Top = 0
        Width = 784
        Height = 24
        Align = alTop
        Caption = 'Informa'#231#245'es do SERASA'
        Color = clWhite
        Space = 5
        ParentColor = False
      end
      object DBGrid21: TDBGrid
        Left = 0
        Top = 24
        Width = 784
        Height = 377
        Align = alClient
        Ctl3D = False
        DataSource = dsSerasa
        Options = [dgTitles, dgIndicator, dgColumnResize, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        ParentCtl3D = False
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDblClick = DBGrid21DblClick
        Columns = <
          item
            Expanded = False
            FieldName = 'SER_QTDE'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            Title.Alignment = taRightJustify
            Title.Caption = 'Qtde'
            Width = 61
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'SER_ANOTACAO'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            Title.Caption = 'Anota'#231#227'o'
            Width = 313
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'SER_DATAINI'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            Title.Alignment = taCenter
            Title.Caption = 'Data Inicial'
            Width = 100
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'SER_DATAFIM'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            Title.Alignment = taCenter
            Title.Caption = 'Data Final'
            Width = 100
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'SER_OCORRENCIA'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            Title.Caption = 'Ocorr'#234'ncia mais recente'
            Width = 200
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'SER_LOCAL'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            Title.Caption = 'Local'
            Width = 200
            Visible = True
          end>
      end
    end
    object tbsNotasCanceladas: TTabSheet
      Caption = 'Notas Canceladas'
      ImageIndex = 11
      OnEnter = tbsNotasCanceladasEnter
      object DBGrid22: TDBGrid
        Left = 0
        Top = 0
        Width = 784
        Height = 164
        Align = alClient
        DataSource = dsNFc
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDblClick = DBGrid15DblClick
        OnTitleClick = DBGrid15TitleClick
        Columns = <
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'BKP_NUMERO'
            Title.Alignment = taCenter
            Title.Caption = 'Nota'
            Width = 76
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'NOTA_SERIE'
            Title.Alignment = taCenter
            Title.Caption = 'Serie'
            Width = 39
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'EMP_CODIGO'
            Title.Alignment = taCenter
            Title.Caption = 'Emp'
            Width = 32
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TRAN_NOME'
            Title.Caption = 'Transportadora'
            Width = 282
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'HIST_CODIGO'
            Title.Alignment = taCenter
            Title.Caption = 'Hist'#243'rico'
            Width = 60
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_VALORCONTABIL'
            Title.Caption = 'Valor Cont'#225'bil'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_DATAFAT'
            Title.Caption = 'Data Fat.'
            Width = 80
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Representante'
            Title.Caption = 'Representate'
            Width = 273
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'MOE_CODIGO'
            Title.Caption = 'Moeda'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Divisao'
            Title.Caption = 'Divis'#227'o'
            Width = 53
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'CONF_CODIGO'
            Title.Caption = 'Cond. Fat'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'CODF_CODIGO'
            Title.Caption = 'Cod. Fiscal'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NATO_CODIGO'
            Title.Caption = 'Natureza'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'REG_CODIGO'
            Title.Caption = 'Regi'#227'o'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_OBSERVACAO'
            Title.Caption = 'Observa'#231#227'o'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_FRETE'
            Title.Caption = 'Frete'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_SEGURO'
            Title.Caption = 'Seguro'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_IPI'
            Title.Caption = 'IPI'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_ICMS'
            Title.Caption = 'ICMS'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_DATAENTRADA'
            Title.Caption = 'Data Entr.'
            Visible = True
          end>
      end
      object DBGrid23: TDBGrid
        Left = 0
        Top = 184
        Width = 784
        Height = 217
        Align = alBottom
        DataSource = dsItNFc
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDblClick = DBGrid16DblClick
        Columns = <
          item
            Expanded = False
            FieldName = 'BKP_PEDIDO'
            Title.Caption = 'Pedido'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PRO_CODIGO'
            Title.Caption = 'Cod. Prod.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'produto'
            Title.Caption = 'Descr. prod'
            Width = 272
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CF'
            Title.Alignment = taCenter
            Title.Caption = 'C.F.'
            Width = 28
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CST'
            Title.Alignment = taCenter
            Title.Caption = 'C.S.T.'
            Width = 46
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'UND'
            Title.Alignment = taCenter
            Width = 33
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_ITEM'
            Title.Caption = 'Item'
            Width = 32
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_QUANTIDADE'
            Title.Caption = 'Quantidade'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_VALORUNIT'
            Title.Caption = 'Vlr. unit.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_CUSTOMEDIO'
            Title.Caption = 'Custo M'#233'dio'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_DESC2'
            Title.Caption = 'Desc2'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_DESC3'
            Title.Caption = 'Desc3'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_DESC4'
            Title.Caption = 'Desc4'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_DESC5'
            Title.Caption = 'Desc5'
            Visible = True
          end>
      end
      object Panel15: TPanel
        Left = 0
        Top = 164
        Width = 784
        Height = 20
        Align = alBottom
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Caption = 'ITENS DA NOTA'
        Color = 16776176
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
      end
    end
    object TabSheet13: TTabSheet
      Caption = 'Notas Devolvidas'
      ImageIndex = 12
      OnEnter = TabSheet13Enter
      object DBGrid24: TDBGrid
        Left = 0
        Top = 0
        Width = 784
        Height = 164
        Align = alClient
        DataSource = dsNFD
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDblClick = DBGrid15DblClick
        OnTitleClick = DBGrid15TitleClick
        Columns = <
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'BKP_NUMERO'
            Title.Alignment = taCenter
            Title.Caption = 'Nota'
            Width = 76
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'NOTA_SERIE'
            Title.Alignment = taCenter
            Title.Caption = 'Serie'
            Width = 39
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'EMP_CODIGO'
            Title.Alignment = taCenter
            Title.Caption = 'Emp'
            Width = 32
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'TRAN_NOME'
            Title.Caption = 'Transportadora'
            Width = 282
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'HIST_CODIGO'
            Title.Alignment = taCenter
            Title.Caption = 'Hist'#243'rico'
            Width = 60
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_VALORCONTABIL'
            Title.Caption = 'Valor Cont'#225'bil'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_DATAFAT'
            Title.Caption = 'Data Fat.'
            Width = 80
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Representante'
            Title.Caption = 'Representate'
            Width = 273
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'MOE_CODIGO'
            Title.Caption = 'Moeda'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Divisao'
            Title.Caption = 'Divis'#227'o'
            Width = 53
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'CONF_CODIGO'
            Title.Caption = 'Cond. Fat'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'CODF_CODIGO'
            Title.Caption = 'Cod. Fiscal'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NATO_CODIGO'
            Title.Caption = 'Natureza'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'REG_CODIGO'
            Title.Caption = 'Regi'#227'o'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_OBSERVACAO'
            Title.Caption = 'Observa'#231#227'o'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_FRETE'
            Title.Caption = 'Frete'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_SEGURO'
            Title.Caption = 'Seguro'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_IPI'
            Title.Caption = 'IPI'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_ICMS'
            Title.Caption = 'ICMS'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOTV_DATAENTRADA'
            Title.Caption = 'Data Entr.'
            Visible = True
          end>
      end
      object DBGrid25: TDBGrid
        Left = 0
        Top = 184
        Width = 784
        Height = 217
        Align = alBottom
        DataSource = dsItNFD
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = [fsBold]
        OnDblClick = DBGrid16DblClick
        Columns = <
          item
            Expanded = False
            FieldName = 'BKP_PEDIDO'
            Title.Caption = 'Pedido'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PRO_CODIGO'
            Title.Caption = 'Cod. Prod.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'produto'
            Title.Caption = 'Descr. prod'
            Width = 272
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CF'
            Title.Alignment = taCenter
            Title.Caption = 'C.F.'
            Width = 28
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'CST'
            Title.Alignment = taCenter
            Title.Caption = 'C.S.T.'
            Width = 46
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'UND'
            Title.Alignment = taCenter
            Width = 33
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_ITEM'
            Title.Caption = 'Item'
            Width = 32
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_QUANTIDADE'
            Title.Caption = 'Quantidade'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_VALORUNIT'
            Title.Caption = 'Vlr. unit.'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_CUSTOMEDIO'
            Title.Caption = 'Custo M'#233'dio'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_DESC2'
            Title.Caption = 'Desc2'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_DESC3'
            Title.Caption = 'Desc3'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_DESC4'
            Title.Caption = 'Desc4'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ITNV_DESC5'
            Title.Caption = 'Desc5'
            Visible = True
          end>
      end
      object Panel16: TPanel
        Left = 0
        Top = 164
        Width = 784
        Height = 20
        Align = alBottom
        BevelInner = bvRaised
        BevelOuter = bvLowered
        Caption = 'ITENS DA NOTA'
        Color = 16776176
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
      end
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 0
    Width = 792
    Height = 69
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object Label4: TLabel
      Left = 9
      Top = 4
      Width = 148
      Height = 13
      Caption = 'Selecione a(s) Empresa(s)'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object ListaEmp: TCheckListBox
      Left = 2
      Top = 20
      Width = 788
      Height = 47
      Align = alBottom
      Color = 16056319
      Columns = 2
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      HeaderBackgroundColor = 16056319
      ItemHeight = 12
      Items.Strings = (
        '001-EMPRESA 1'
        '002-EMPRESA 2'
        '003-EMPRESA 3'
        '003-EMPRESA 3')
      ParentFont = False
      TabOrder = 0
      OnExit = ListaEmpExit
    end
  end
  object dtPed: TDataSource
    DataSet = cdsPed
    Left = 92
    Top = 297
  end
  object tqPed: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      
        'Select p.*, bkp_pedido from PedidosVenda P, Backup_Pedido B, par' +
        'ametros t'
      
        'where (p.Ped_Numero = b.Ped_Numero and p.Ent_codigo = b.Ent_Codi' +
        'go)'
      'and p.TIPP_CODIGO <> t.tipp_asstec and Ped_Situacao = '#39'P'#39)
    Left = 8
    Top = 297
    object tqPedPED_NUMERO: TStringField
      FieldName = 'PED_NUMERO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_NUMERO'
      Size = 9
    end
    object tqPedENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.ENT_CODIGO'
      Size = 5
    end
    object tqPedCONF_CODIGO: TStringField
      FieldName = 'CONF_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.CONF_CODIGO'
      Size = 2
    end
    object tqPedEMP_CODIGO: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.EMP_CODIGO'
      Size = 3
    end
    object tqPedDIV_CODIGO: TStringField
      FieldName = 'DIV_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.DIV_CODIGO'
      Size = 2
    end
    object tqPedCOD_USUA: TStringField
      FieldName = 'COD_USUA'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.COD_USUA'
      Size = 10
    end
    object tqPedMOE_CODIGO: TStringField
      FieldName = 'MOE_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.MOE_CODIGO'
      Size = 2
    end
    object tqPedTRAN_CODIGO: TStringField
      FieldName = 'TRAN_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.TRAN_CODIGO'
      Size = 3
    end
    object tqPedCANP_CODIGO: TStringField
      FieldName = 'CANP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.CANP_CODIGO'
      Size = 3
    end
    object tqPedREG_CODIGO: TStringField
      FieldName = 'REG_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.REG_CODIGO'
      Size = 3
    end
    object tqPedTIPP_CODIGO: TStringField
      FieldName = 'TIPP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.TIPP_CODIGO'
      Size = 2
    end
    object tqPedSUP_CODIGO: TStringField
      FieldName = 'SUP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.SUP_CODIGO'
      Size = 3
    end
    object tqPedREP_CODIGO: TStringField
      FieldName = 'REP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.REP_CODIGO'
      Size = 3
    end
    object tqPedPED_DATAPED: TDateTimeField
      FieldName = 'PED_DATAPED'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATAPED'
    end
    object tqPedPED_DATACHE: TDateTimeField
      FieldName = 'PED_DATACHE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATACHE'
    end
    object tqPedPED_COMISREP: TFloatField
      FieldName = 'PED_COMISREP'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_COMISREP'
    end
    object tqPedPED_COMISSUP: TFloatField
      FieldName = 'PED_COMISSUP'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_COMISSUP'
    end
    object tqPedPED_ALIQFINAN: TFloatField
      FieldName = 'PED_ALIQFINAN'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQFINAN'
    end
    object tqPedPED_ALIQEMB: TFloatField
      FieldName = 'PED_ALIQEMB'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQEMB'
    end
    object tqPedPED_ALIQFRETE: TFloatField
      FieldName = 'PED_ALIQFRETE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQFRETE'
    end
    object tqPedPED_ALIQSEGURO: TFloatField
      FieldName = 'PED_ALIQSEGURO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQSEGURO'
    end
    object tqPedPED_TIPOFRETE: TStringField
      FieldName = 'PED_TIPOFRETE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_TIPOFRETE'
      Size = 1
    end
    object tqPedPED_OBS: TStringField
      FieldName = 'PED_OBS'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_OBS'
      Size = 40
    end
    object tqPedPED_DATADIGI: TDateTimeField
      FieldName = 'PED_DATADIGI'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATADIGI'
    end
    object tqPedPED_PEDCLIE: TStringField
      FieldName = 'PED_PEDCLIE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PEDCLIE'
      Size = 9
    end
    object tqPedPED_PEDREPRE: TStringField
      FieldName = 'PED_PEDREPRE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PEDREPRE'
      Size = 9
    end
    object tqPedPED_VALOR: TFloatField
      FieldName = 'PED_VALOR'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_VALOR'
    end
    object tqPedPED_TOTALPROD: TFloatField
      FieldName = 'PED_TOTALPROD'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_TOTALPROD'
    end
    object tqPedPED_QTDEEMB: TFloatField
      FieldName = 'PED_QTDEEMB'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_QTDEEMB'
    end
    object tqPedPED_PESOLIQ: TFloatField
      FieldName = 'PED_PESOLIQ'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PESOLIQ'
    end
    object tqPedPED_PESOBRU: TFloatField
      FieldName = 'PED_PESOBRU'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PESOBRU'
    end
    object tqPedPED_NUMPGTOS: TFloatField
      FieldName = 'PED_NUMPGTOS'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_NUMPGTOS'
    end
    object tqPedPED_PRAZOMEDIO: TFloatField
      FieldName = 'PED_PRAZOMEDIO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PRAZOMEDIO'
    end
    object tqPedPED_LIBERADO: TStringField
      FieldName = 'PED_LIBERADO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_LIBERADO'
      Size = 1
    end
    object tqPedPED_CONFERIDO: TStringField
      FieldName = 'PED_CONFERIDO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_CONFERIDO'
      Size = 1
    end
    object tqPedPED_ULTALTERACAO: TDateTimeField
      FieldName = 'PED_ULTALTERACAO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ULTALTERACAO'
    end
    object tqPedPED_SITUACAO: TStringField
      FieldName = 'PED_SITUACAO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_SITUACAO'
      Size = 1
    end
    object tqPedPED_ALIQDESC: TFloatField
      FieldName = 'PED_ALIQDESC'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQDESC'
    end
    object tqPedPED_DESCONTO: TFloatField
      FieldName = 'PED_DESCONTO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DESCONTO'
    end
    object tqPedPED_DATACANC: TDateTimeField
      FieldName = 'PED_DATACANC'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATACANC'
    end
    object tqPedBKP_PEDIDO: TStringField
      FieldName = 'BKP_PEDIDO'
      Origin = 'INDUSTRIAL.BACKUP_PEDIDO.BKP_PEDIDO'
      Size = 9
    end
    object tqPedRepresentante: TStringField
      FieldKind = fkLookup
      FieldName = 'Representante'
      LookupDataSet = tqRepr
      LookupKeyFields = 'REP_CODIGO'
      LookupResultField = 'REP_NOME'
      KeyFields = 'REP_CODIGO'
      Size = 40
      Lookup = True
    end
    object tqPedDivisao: TStringField
      FieldKind = fkLookup
      FieldName = 'Divisao'
      LookupDataSet = tqDivisao
      LookupKeyFields = 'DIV_CODIGO'
      LookupResultField = 'DIV_DESCRICAO'
      KeyFields = 'DIV_CODIGO'
      Lookup = True
    end
    object tqPedTransportadora: TStringField
      FieldKind = fkLookup
      FieldName = 'Transportadora'
      LookupDataSet = tqTrans
      LookupKeyFields = 'TRAN_CODIGO'
      LookupResultField = 'TRAN_NOME'
      KeyFields = 'TRAN_CODIGO'
      Size = 40
      Lookup = True
    end
    object tqPedRegra: TStringField
      FieldKind = fkLookup
      FieldName = 'Regra'
      LookupDataSet = tqRegiao
      LookupKeyFields = 'REG_CODIGO'
      LookupResultField = 'REG_DESCRICAO'
      KeyFields = 'REG_CODIGO'
      Size = 40
      Lookup = True
    end
  end
  object tqItemPed: TQuery
    DatabaseName = 'industrial'
    DataSource = dtPed
    SQL.Strings = (
      'Select * from itemPedVenda'
      'where Ped_Numero = :Ped_Numero')
    Left = 8
    Top = 325
    ParamData = <
      item
        DataType = ftString
        Name = 'PED_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end>
    object tqItemPedPED_NUMERO: TStringField
      FieldName = 'PED_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PED_NUMERO'
      Size = 9
    end
    object tqItemPedPED_ITEM: TStringField
      FieldName = 'PED_ITEM'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PED_ITEM'
      Size = 2
    end
    object tqItemPedNOTA_SERIE: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.NOTA_SERIE'
      Size = 3
    end
    object tqItemPedNOTA_NUMERO: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.NOTA_NUMERO'
      Size = 9
    end
    object tqItemPedENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ENT_CODIGO'
      Size = 5
    end
    object tqItemPedITNV_ITEM: TStringField
      FieldName = 'ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITNV_ITEM'
      Size = 2
    end
    object tqItemPedPRO_CODIGO: TStringField
      FieldName = 'PRO_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PRO_CODIGO'
      Size = 15
    end
    object tqItemPedEMP_CODIGO: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.EMP_CODIGO'
      Size = 3
    end
    object tqItemPedORD_NUMERO: TStringField
      FieldName = 'ORD_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ORD_NUMERO'
      Size = 6
    end
    object tqItemPedITPV_QUANTIDADE: TFloatField
      FieldName = 'ITPV_QUANTIDADE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_QUANTIDADE'
    end
    object tqItemPedITPV_VALORUNIT: TFloatField
      FieldName = 'ITPV_VALORUNIT'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_VALORUNIT'
    end
    object tqItemPedITPV_ALIQDESC: TFloatField
      FieldName = 'ITPV_ALIQDESC'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQDESC'
    end
    object tqItemPedITPV_ALIQIPI: TFloatField
      FieldName = 'ITPV_ALIQIPI'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQIPI'
    end
    object tqItemPedITPV_COMISREP: TFloatField
      FieldName = 'ITPV_COMISREP'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_COMISREP'
    end
    object tqItemPedITPV_PRECOGERADO: TFloatField
      FieldName = 'ITPV_PRECOGERADO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PRECOGERADO'
    end
    object tqItemPedITPV_PENDENTE: TFloatField
      FieldName = 'ITPV_PENDENTE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PENDENTE'
    end
    object tqItemPedITPV_PREVISAO: TDateTimeField
      FieldName = 'ITPV_PREVISAO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PREVISAO'
    end
    object tqItemPedITPV_DESC2: TFloatField
      FieldName = 'ITPV_DESC2'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC2'
    end
    object tqItemPedITPV_DESC3: TFloatField
      FieldName = 'ITPV_DESC3'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC3'
    end
    object tqItemPedITPV_DESC4: TFloatField
      FieldName = 'ITPV_DESC4'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC4'
    end
    object tqItemPedITPV_DESC5: TFloatField
      FieldName = 'ITPV_DESC5'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC5'
    end
    object tqItemPedITPV_ALIQICMS: TFloatField
      FieldName = 'ITPV_ALIQICMS'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQICMS'
    end
    object tqItemPedICMS_CODIGO: TStringField
      FieldName = 'ICMS_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ICMS_CODIGO'
      Size = 2
    end
    object tqItemPedITPV_CODTRIBUTARIO: TStringField
      FieldName = 'ITPV_CODTRIBUTARIO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_CODTRIBUTARIO'
      Size = 3
    end
    object tqItemPedProduto: TStringField
      FieldKind = fkLookup
      FieldName = 'Produto'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_NOME'
      KeyFields = 'PRO_CODIGO'
      Size = 40
      Lookup = True
    end
    object tqItemPedCF: TStringField
      FieldKind = fkLookup
      FieldName = 'CF'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'NBM_CODIGO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object tqItemPedCST: TStringField
      FieldKind = fkLookup
      FieldName = 'CST'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_CODTRIBUTARIO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object tqItemPedUND: TStringField
      FieldKind = fkLookup
      FieldName = 'UND'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_UNIDADE'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object tqItemPedTot: TFloatField
      FieldKind = fkCalculated
      FieldName = 'Tot'
      Calculated = True
    end
  end
  object dtItemPed: TDataSource
    DataSet = tqItemPed
    Left = 36
    Top = 325
  end
  object tqNota: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      
        'Select distinct p.*, bkp_pedido, s.tran_nome, rd.tran_nome as re' +
        'despacho, NOTV_DATAFAT, notv_database,'
      'Notv_ValorContabil, NOTV_TOTALPRODUTO  from '
      'PedidosVenda P, Backup_Pedido B, parametros t, '
      'transportadora s, movitempedvenda i, notavenda n,'
      'backup_venda v, transportadora rd'
      
        'where (p.Ped_Numero = b.Ped_Numero and p.Ent_codigo = b.Ent_Codi' +
        'go)'
      'and p.TIPP_CODIGO <> t.tipp_asstec and Ped_Situacao = '#39'F'#39
      
        'and ((i.ped_numero = p.ped_numero)or(i.ped_numero2 = p.ped_numer' +
        'o))'
      
        'and (i.nota_numero = n.nota_numero and i.nota_serie = n.nota_ser' +
        'ie and'
      'i.ent_codigo = n.ent_codigo)'
      'and s.tran_codigo = n.tran_codigo'
      'and i.nota_numero = v.nota_numero'
      'and rd.tran_codigo(+) = n.tran_codigo_redespacho')
    Left = 8
    Top = 353
    object tqNotaPED_NUMERO: TStringField
      FieldName = 'PED_NUMERO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_NUMERO'
      Size = 9
    end
    object tqNotaENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.ENT_CODIGO'
      Size = 5
    end
    object tqNotaCONF_CODIGO: TStringField
      FieldName = 'CONF_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.CONF_CODIGO'
      Size = 2
    end
    object tqNotaEMP_CODIGO: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.EMP_CODIGO'
      Size = 3
    end
    object tqNotaDIV_CODIGO: TStringField
      FieldName = 'DIV_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.DIV_CODIGO'
      Size = 2
    end
    object tqNotaCOD_USUA: TStringField
      FieldName = 'COD_USUA'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.COD_USUA'
      Size = 10
    end
    object tqNotaMOE_CODIGO: TStringField
      FieldName = 'MOE_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.MOE_CODIGO'
      Size = 2
    end
    object tqNotaTRAN_CODIGO: TStringField
      FieldName = 'TRAN_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.TRAN_CODIGO'
      Size = 3
    end
    object tqNotaCANP_CODIGO: TStringField
      FieldName = 'CANP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.CANP_CODIGO'
      Size = 3
    end
    object tqNotaREG_CODIGO: TStringField
      FieldName = 'REG_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.REG_CODIGO'
      Size = 3
    end
    object tqNotaTIPP_CODIGO: TStringField
      FieldName = 'TIPP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.TIPP_CODIGO'
      Size = 2
    end
    object tqNotaSUP_CODIGO: TStringField
      FieldName = 'SUP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.SUP_CODIGO'
      Size = 3
    end
    object tqNotaREP_CODIGO: TStringField
      FieldName = 'REP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.REP_CODIGO'
      Size = 3
    end
    object tqNotaPED_DATAPED: TDateTimeField
      FieldName = 'PED_DATAPED'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATAPED'
    end
    object tqNotaPED_DATACHE: TDateTimeField
      FieldName = 'PED_DATACHE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATACHE'
    end
    object tqNotaPED_COMISREP: TFloatField
      FieldName = 'PED_COMISREP'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_COMISREP'
    end
    object tqNotaPED_COMISSUP: TFloatField
      FieldName = 'PED_COMISSUP'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_COMISSUP'
    end
    object tqNotaPED_ALIQFINAN: TFloatField
      FieldName = 'PED_ALIQFINAN'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQFINAN'
    end
    object tqNotaPED_ALIQEMB: TFloatField
      FieldName = 'PED_ALIQEMB'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQEMB'
    end
    object tqNotaPED_ALIQFRETE: TFloatField
      FieldName = 'PED_ALIQFRETE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQFRETE'
    end
    object tqNotaPED_ALIQSEGURO: TFloatField
      FieldName = 'PED_ALIQSEGURO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQSEGURO'
    end
    object tqNotaPED_TIPOFRETE: TStringField
      FieldName = 'PED_TIPOFRETE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_TIPOFRETE'
      Size = 1
    end
    object tqNotaPED_OBS: TStringField
      FieldName = 'PED_OBS'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_OBS'
      Size = 40
    end
    object tqNotaPED_DATADIGI: TDateTimeField
      FieldName = 'PED_DATADIGI'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATADIGI'
    end
    object tqNotaPED_PEDCLIE: TStringField
      FieldName = 'PED_PEDCLIE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PEDCLIE'
      Size = 9
    end
    object tqNotaPED_PEDREPRE: TStringField
      FieldName = 'PED_PEDREPRE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PEDREPRE'
      Size = 9
    end
    object tqNotaPED_VALOR: TFloatField
      FieldName = 'PED_VALOR'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_VALOR'
    end
    object tqNotaPED_TOTALPROD: TFloatField
      FieldName = 'PED_TOTALPROD'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_TOTALPROD'
    end
    object tqNotaPED_QTDEEMB: TFloatField
      FieldName = 'PED_QTDEEMB'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_QTDEEMB'
    end
    object tqNotaPED_PESOLIQ: TFloatField
      FieldName = 'PED_PESOLIQ'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PESOLIQ'
    end
    object tqNotaPED_PESOBRU: TFloatField
      FieldName = 'PED_PESOBRU'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PESOBRU'
    end
    object tqNotaPED_NUMPGTOS: TFloatField
      FieldName = 'PED_NUMPGTOS'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_NUMPGTOS'
    end
    object tqNotaPED_PRAZOMEDIO: TFloatField
      FieldName = 'PED_PRAZOMEDIO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PRAZOMEDIO'
    end
    object tqNotaPED_LIBERADO: TStringField
      FieldName = 'PED_LIBERADO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_LIBERADO'
      Size = 1
    end
    object tqNotaPED_CONFERIDO: TStringField
      FieldName = 'PED_CONFERIDO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_CONFERIDO'
      Size = 1
    end
    object tqNotaPED_ULTALTERACAO: TDateTimeField
      FieldName = 'PED_ULTALTERACAO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ULTALTERACAO'
    end
    object tqNotaPED_SITUACAO: TStringField
      FieldName = 'PED_SITUACAO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_SITUACAO'
      Size = 1
    end
    object tqNotaPED_ALIQDESC: TFloatField
      FieldName = 'PED_ALIQDESC'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQDESC'
    end
    object tqNotaPED_DESCONTO: TFloatField
      FieldName = 'PED_DESCONTO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DESCONTO'
    end
    object tqNotaBKP_PEDIDO: TStringField
      FieldName = 'BKP_PEDIDO'
      Origin = 'INDUSTRIAL.BACKUP_PEDIDO.BKP_PEDIDO'
      Size = 9
    end
    object tqNotaPED_DATACANC: TDateTimeField
      FieldName = 'PED_DATACANC'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATACANC'
    end
    object tqNotaDivisao: TStringField
      FieldKind = fkLookup
      FieldName = 'Divisao'
      LookupDataSet = tqDivisao
      LookupKeyFields = 'DIV_CODIGO'
      LookupResultField = 'DIV_DESCRICAO'
      KeyFields = 'DIV_CODIGO'
      Lookup = True
    end
    object tqNotaTransportadora: TStringField
      FieldKind = fkLookup
      FieldName = 'Transportadora'
      LookupDataSet = tqTrans
      LookupKeyFields = 'TRAN_CODIGO'
      LookupResultField = 'TRAN_NOME'
      KeyFields = 'TRAN_CODIGO'
      Size = 40
      Lookup = True
    end
    object tqNotaRegra: TStringField
      FieldKind = fkLookup
      FieldName = 'Regra'
      LookupDataSet = tqRegiao
      LookupKeyFields = 'REG_CODIGO'
      LookupResultField = 'REG_DESCRICAO'
      KeyFields = 'REG_CODIGO'
      Size = 40
      Lookup = True
    end
    object tqNotaRepresentante: TStringField
      FieldKind = fkLookup
      FieldName = 'Representante'
      LookupDataSet = tqRepr
      LookupKeyFields = 'REP_CODIGO'
      LookupResultField = 'REP_NOME'
      KeyFields = 'REP_CODIGO'
      Size = 40
      Lookup = True
    end
    object tqNotaTRAN_NOME: TStringField
      FieldName = 'TRAN_NOME'
      Origin = 'INDUSTRIAL.TRANSPORTADORA.TRAN_NOME'
      Size = 40
    end
    object tqNotaNOTV_DATAFAT: TDateTimeField
      FieldName = 'NOTV_DATAFAT'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DATAFAT'
    end
    object tqNotaNOTV_VALORCONTABIL: TFloatField
      FieldName = 'NOTV_VALORCONTABIL'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_VALORCONTABIL'
    end
    object tqNotaNOTV_TOTALPRODUTO: TFloatField
      FieldName = 'NOTV_TOTALPRODUTO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_TOTALPRODUTO'
    end
    object tqNotaNOTV_DATABASE: TDateTimeField
      FieldName = 'NOTV_DATABASE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DATABASE'
    end
    object tqNotaTRAN_CODIGO_REDESPACHO: TStringField
      FieldName = 'TRAN_CODIGO_REDESPACHO'
      Size = 3
    end
    object tqNotaREDESPACHO: TStringField
      FieldName = 'REDESPACHO'
      Size = 40
    end
  end
  object tqItemNota: TQuery
    DatabaseName = 'industrial'
    DataSource = dtNota
    SQL.Strings = (
      'Select distinct i.*, bkp_numero, bkp_serie,'
      '       m.nota_serie Serie, i.nota_numero Nota,'
      '       it.itnv_quantidade'
      ''
      'from itemPedVenda i , Backup_Venda b,'
      '     movitempedvenda m, itemnotavenda it'
      ''
      'where ((m.Nota_numero = b.Nota_Numero  and'
      '        m.Nota_Serie  = b.Nota_Serie   and'
      '        m.Ent_Codigo  = b.Ent_Codigo'
      '       ) and'
      '       (m.nota_numero = it.nota_numero and'
      '        m.nota_serie  = it.nota_serie  and'
      '        m.ent_codigo  = it.Ent_codigo  and'
      '        m.itnv_item   = it.itnv_item'
      '       ) and'
      
        '       ((m.ped_numero  = i.ped_numero or m.ped_numero2 = i.ped_n' +
        'umero)   and'
      '        m.ped_item    = i.ped_item'
      '       )'
      '      ) and'
      '      i.ped_numero  = :ped_numero'
      ''
      'order by m.Nota_Serie, Bkp_Numero, i.Itnv_Item')
    Left = 8
    Top = 381
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'ped_numero'
        ParamType = ptUnknown
      end>
    object tqItemNotaPED_NUMERO: TStringField
      FieldName = 'PED_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PED_NUMERO'
      Size = 9
    end
    object tqItemNotaPED_ITEM: TStringField
      FieldName = 'PED_ITEM'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PED_ITEM'
      Size = 2
    end
    object tqItemNotaENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ENT_CODIGO'
      Size = 5
    end
    object tqItemNotaITNV_ITEM: TStringField
      FieldName = 'ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITNV_ITEM'
      Size = 2
    end
    object tqItemNotaITNV_QUANTIDADE: TFloatField
      FieldName = 'ITNV_QUANTIDADE'
    end
    object tqItemNotaPRO_CODIGO: TStringField
      FieldName = 'PRO_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PRO_CODIGO'
      Size = 15
    end
    object tqItemNotaEMP_CODIGO: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.EMP_CODIGO'
      Size = 3
    end
    object tqItemNotaORD_NUMERO: TStringField
      FieldName = 'ORD_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ORD_NUMERO'
      Size = 6
    end
    object tqItemNotaITPV_QUANTIDADE: TFloatField
      FieldName = 'ITPV_QUANTIDADE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_QUANTIDADE'
    end
    object tqItemNotaITPV_VALORUNIT: TFloatField
      FieldName = 'ITPV_VALORUNIT'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_VALORUNIT'
    end
    object tqItemNotaITPV_ALIQDESC: TFloatField
      FieldName = 'ITPV_ALIQDESC'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQDESC'
    end
    object tqItemNotaITPV_ALIQIPI: TFloatField
      FieldName = 'ITPV_ALIQIPI'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQIPI'
    end
    object tqItemNotaITPV_COMISREP: TFloatField
      FieldName = 'ITPV_COMISREP'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_COMISREP'
    end
    object tqItemNotaITPV_PRECOGERADO: TFloatField
      FieldName = 'ITPV_PRECOGERADO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PRECOGERADO'
    end
    object tqItemNotaITPV_PENDENTE: TFloatField
      FieldName = 'ITPV_PENDENTE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PENDENTE'
    end
    object tqItemNotaITPV_PREVISAO: TDateTimeField
      FieldName = 'ITPV_PREVISAO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PREVISAO'
    end
    object tqItemNotaITPV_DESC2: TFloatField
      FieldName = 'ITPV_DESC2'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC2'
    end
    object tqItemNotaITPV_DESC3: TFloatField
      FieldName = 'ITPV_DESC3'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC3'
    end
    object tqItemNotaITPV_DESC4: TFloatField
      FieldName = 'ITPV_DESC4'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC4'
    end
    object tqItemNotaITPV_DESC5: TFloatField
      FieldName = 'ITPV_DESC5'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC5'
    end
    object tqItemNotaITPV_ALIQICMS: TFloatField
      FieldName = 'ITPV_ALIQICMS'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQICMS'
    end
    object tqItemNotaICMS_CODIGO: TStringField
      FieldName = 'ICMS_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ICMS_CODIGO'
      Size = 2
    end
    object tqItemNotaITPV_CODTRIBUTARIO: TStringField
      FieldName = 'ITPV_CODTRIBUTARIO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_CODTRIBUTARIO'
      Size = 3
    end
    object tqItemNotaProduto: TStringField
      FieldKind = fkLookup
      FieldName = 'Produto'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_NOME'
      KeyFields = 'PRO_CODIGO'
      Size = 40
      Lookup = True
    end
    object tqItemNotaCF: TStringField
      FieldKind = fkLookup
      FieldName = 'CF'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'NBM_CODIGO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object tqItemNotaCST: TStringField
      FieldKind = fkLookup
      FieldName = 'CST'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_CODTRIBUTARIO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object tqItemNotaUND: TStringField
      FieldKind = fkLookup
      FieldName = 'UND'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_UNIDADE'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object tqItemNotaBKP_NUMERO: TStringField
      FieldName = 'BKP_NUMERO'
      Origin = 'INDUSTRIAL.BACKUP_VENDA.BKP_NUMERO'
      Size = 9
    end
    object tqItemNotaBKP_SERIE: TStringField
      FieldName = 'BKP_SERIE'
      Origin = 'INDUSTRIAL.BACKUP_VENDA.BKP_SERIE'
      Size = 3
    end
    object tqItemNotaSERIE: TStringField
      FieldName = 'SERIE'
      Origin = 'INDUSTRIAL.MOVITEMPEDVENDA.NOTA_SERIE'
      Size = 3
    end
    object tqItemNotaNOTA: TStringField
      FieldName = 'NOTA'
      Origin = 'INDUSTRIAL.MOVITEMPEDVENDA.NOTA_NUMERO'
      Size = 9
    end
  end
  object tqTitNota: TQuery
    DatabaseName = 'industrial'
    DataSource = dtItemNota
    SQL.Strings = (
      'Select * from titcredito'
      'where Nota_Numero =:Nota and Nota_Serie =:Serie and'
      'Ent_Codigo =:Ent_Codigo'
      'order by Titc_Numero')
    Left = 8
    Top = 409
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'Nota'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'Serie'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'ENT_CODIGO'
        ParamType = ptUnknown
        Size = 6
      end>
    object tqTitNotaTIPD_CODIGO: TStringField
      FieldName = 'TIPD_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.TIPD_CODIGO'
      Size = 1
    end
    object tqTitNotaTITC_NUMERO: TStringField
      FieldName = 'TITC_NUMERO'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_NUMERO'
    end
    object tqTitNotaENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.ENT_CODIGO'
      Size = 5
    end
    object tqTitNotaNOTA_NUMERO: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.TITCREDITO.NOTA_NUMERO'
      Size = 9
    end
    object tqTitNotaLOCAL_CODIGO: TStringField
      FieldName = 'LOCAL_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.LOCAL_CODIGO'
      Size = 3
    end
    object tqTitNotaSUBL_CODIGO: TStringField
      FieldName = 'SUBL_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.SUBL_CODIGO'
      Size = 3
    end
    object tqTitNotaEMP_CODIGO: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.EMP_CODIGO'
      Size = 3
    end
    object tqTitNotaMOE_CODIGO: TStringField
      FieldName = 'MOE_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.MOE_CODIGO'
      Size = 2
    end
    object tqTitNotaHIST_CODIGO: TStringField
      FieldName = 'HIST_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.HIST_CODIGO'
      Size = 10
    end
    object tqTitNotaBORD_NUMERO: TStringField
      FieldName = 'BORD_NUMERO'
      Origin = 'INDUSTRIAL.TITCREDITO.BORD_NUMERO'
      Size = 15
    end
    object tqTitNotaTITC_VALOR: TFloatField
      FieldName = 'TITC_VALOR'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_VALOR'
    end
    object tqTitNotaTITC_DATAVENC: TDateTimeField
      FieldName = 'TITC_DATAVENC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_DATAVENC'
    end
    object tqTitNotaTITC_VENCORIG: TDateTimeField
      FieldName = 'TITC_VENCORIG'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_VENCORIG'
    end
    object tqTitNotaTITC_DATAEMIS: TDateTimeField
      FieldName = 'TITC_DATAEMIS'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_DATAEMIS'
    end
    object tqTitNotaTITC_TIPOVENC: TFloatField
      FieldName = 'TITC_TIPOVENC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_TIPOVENC'
    end
    object tqTitNotaTITC_OBS: TStringField
      FieldName = 'TITC_OBS'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_OBS'
      Size = 40
    end
    object tqTitNotaTITC_OBS2: TStringField
      FieldName = 'TITC_OBS2'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_OBS2'
      Size = 40
    end
    object tqTitNotaTITC_NUMBLOQ: TStringField
      FieldName = 'TITC_NUMBLOQ'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_NUMBLOQ'
      Size = 15
    end
    object tqTitNotaTITC_BCCOMIS: TFloatField
      FieldName = 'TITC_BCCOMIS'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_BCCOMIS'
    end
    object tqTitNotaTITC_DATADESC: TDateTimeField
      FieldName = 'TITC_DATADESC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_DATADESC'
    end
    object tqTitNotaTITC_VLDESC: TFloatField
      FieldName = 'TITC_VLDESC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_VLDESC'
    end
    object tqTitNotaTITC_OBS0: TMemoField
      FieldName = 'TITC_OBS0'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_OBS0'
      BlobType = ftMemo
      Size = 2000
    end
    object tqTitNotaTITC_SALDO: TFloatField
      FieldName = 'TITC_SALDO'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_SALDO'
    end
    object tqTitNotaTITC_DATAPGTO: TDateTimeField
      FieldName = 'TITC_DATAPGTO'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_DATAPGTO'
    end
    object tqTitNotaTITC_DC: TFloatField
      FieldName = 'TITC_DC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_DC'
    end
    object tqTitNotaTITC_PAGREC: TStringField
      FieldName = 'TITC_PAGREC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_PAGREC'
      Size = 1
    end
    object tqTitNotaREP_CODIGO: TStringField
      FieldName = 'REP_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.REP_CODIGO'
      Size = 3
    end
    object tqTitNotaNOTAC_NUMERO: TStringField
      FieldName = 'NOTAC_NUMERO'
      Origin = 'INDUSTRIAL.TITCREDITO.NOTAC_NUMERO'
      Size = 9
    end
    object tqTitNotaNOTA_SERIE: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.TITCREDITO.NOTA_SERIE'
      Size = 3
    end
    object tqTitNotaNOTC_SERIE: TStringField
      FieldName = 'NOTC_SERIE'
      Origin = 'INDUSTRIAL.TITCREDITO.NOTC_SERIE'
      Size = 3
    end
    object tqTitNotaTITC_CONTAB: TStringField
      FieldName = 'TITC_CONTAB'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_CONTAB'
      Size = 1
    end
  end
  object dtNota: TDataSource
    DataSet = cdsNota
    Left = 92
    Top = 353
  end
  object dtItemNota: TDataSource
    DataSet = tqItemNota
    Left = 36
    Top = 381
  end
  object dtitemPedAss: TDataSource
    DataSet = tqItemPedAss
    Left = 36
    Top = 185
  end
  object dtPedAss: TDataSource
    DataSet = cdsPedAss
    Left = 92
    Top = 157
  end
  object dtNotaAss: TDataSource
    DataSet = cdsNotaAss
    Left = 92
    Top = 213
  end
  object dtItemNotaAss: TDataSource
    DataSet = tqItemNotaAss
    Left = 36
    Top = 241
  end
  object dtTitAss: TDataSource
    DataSet = tqTitNotaAss
    Left = 36
    Top = 269
  end
  object tqTitNotaAss: TQuery
    DatabaseName = 'industrial'
    DataSource = dtItemNotaAss
    SQL.Strings = (
      'Select * from titcredito'
      'where Nota_Numero =:Nota_numero and Nota_Serie =:Nota_Serie and'
      'Ent_Codigo =:Ent_Codigo')
    Left = 8
    Top = 269
    ParamData = <
      item
        DataType = ftString
        Name = 'NOTA_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end
      item
        DataType = ftString
        Name = 'NOTA_SERIE'
        ParamType = ptUnknown
        Size = 4
      end
      item
        DataType = ftString
        Name = 'ENT_CODIGO'
        ParamType = ptUnknown
        Size = 6
      end>
  end
  object tqTit: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      'Select t.*,'
      '(TITC_DATAVENC-Trunc(SysDate)) as PzDias, '
      
        '(TITC_DATAVENC-TITC_DATAPGTO) as PzDias1 ,bkp_numero, bkp_serie ' +
        'from TitCredito t, Backup_venda b'
      'where t.nota_numero = b.nota_numero'
      'and t.nota_serie = b.nota_serie'
      'and t.ent_codigo = b.ent_codigo')
    Left = 8
    Top = 437
    object tqTitTIPD_CODIGO: TStringField
      FieldName = 'TIPD_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.TIPD_CODIGO'
      Size = 1
    end
    object tqTitTITC_NUMERO: TStringField
      FieldName = 'TITC_NUMERO'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_NUMERO'
    end
    object tqTitENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.ENT_CODIGO'
      Size = 5
    end
    object tqTitNOTA_NUMERO: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.TITCREDITO.NOTA_NUMERO'
      Size = 9
    end
    object tqTitLOCAL_CODIGO: TStringField
      FieldName = 'LOCAL_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.LOCAL_CODIGO'
      Size = 3
    end
    object tqTitSUBL_CODIGO: TStringField
      FieldName = 'SUBL_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.SUBL_CODIGO'
      Size = 3
    end
    object tqTitEMP_CODIGO: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.EMP_CODIGO'
      Size = 3
    end
    object tqTitMOE_CODIGO: TStringField
      FieldName = 'MOE_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.MOE_CODIGO'
      Size = 2
    end
    object tqTitHIST_CODIGO: TStringField
      FieldName = 'HIST_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.HIST_CODIGO'
      Size = 10
    end
    object tqTitBORD_NUMERO: TStringField
      FieldName = 'BORD_NUMERO'
      Origin = 'INDUSTRIAL.TITCREDITO.BORD_NUMERO'
      Size = 15
    end
    object tqTitTITC_VALOR: TFloatField
      FieldName = 'TITC_VALOR'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_VALOR'
      currency = True
    end
    object tqTitTITC_DATAVENC: TDateTimeField
      FieldName = 'TITC_DATAVENC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_DATAVENC'
    end
    object tqTitTITC_VENCORIG: TDateTimeField
      FieldName = 'TITC_VENCORIG'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_VENCORIG'
    end
    object tqTitTITC_DATAEMIS: TDateTimeField
      FieldName = 'TITC_DATAEMIS'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_DATAEMIS'
    end
    object tqTitTITC_TIPOVENC: TFloatField
      FieldName = 'TITC_TIPOVENC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_TIPOVENC'
    end
    object tqTitTITC_OBS: TStringField
      FieldName = 'TITC_OBS'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_OBS'
      Size = 40
    end
    object tqTitTITC_OBS2: TStringField
      FieldName = 'TITC_OBS2'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_OBS2'
      Size = 40
    end
    object tqTitTITC_NUMBLOQ: TStringField
      FieldName = 'TITC_NUMBLOQ'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_NUMBLOQ'
      Size = 15
    end
    object tqTitTITC_BCCOMIS: TFloatField
      FieldName = 'TITC_BCCOMIS'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_BCCOMIS'
    end
    object tqTitTITC_DATADESC: TDateTimeField
      FieldName = 'TITC_DATADESC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_DATADESC'
    end
    object tqTitTITC_VLDESC: TFloatField
      FieldName = 'TITC_VLDESC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_VLDESC'
    end
    object tqTitTITC_OBS0: TMemoField
      FieldName = 'TITC_OBS0'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_OBS0'
      BlobType = ftMemo
      Size = 2000
    end
    object tqTitTITC_SALDO: TFloatField
      FieldName = 'TITC_SALDO'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_SALDO'
      currency = True
    end
    object tqTitTITC_DATAPGTO: TDateTimeField
      FieldName = 'TITC_DATAPGTO'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_DATAPGTO'
      EditMask = '!99/99/0000;1;_'
    end
    object tqTitTITC_DC: TFloatField
      FieldName = 'TITC_DC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_DC'
    end
    object tqTitTITC_PAGREC: TStringField
      FieldName = 'TITC_PAGREC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_PAGREC'
      Size = 1
    end
    object tqTitREP_CODIGO: TStringField
      FieldName = 'REP_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.REP_CODIGO'
      Size = 3
    end
    object tqTitNOTAC_NUMERO: TStringField
      FieldName = 'NOTAC_NUMERO'
      Origin = 'INDUSTRIAL.TITCREDITO.NOTAC_NUMERO'
      Size = 9
    end
    object tqTitNOTA_SERIE: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.TITCREDITO.NOTA_SERIE'
      Size = 3
    end
    object tqTitNOTC_SERIE: TStringField
      FieldName = 'NOTC_SERIE'
      Origin = 'INDUSTRIAL.TITCREDITO.NOTC_SERIE'
      Size = 3
    end
    object tqTitTITC_CONTAB: TStringField
      FieldName = 'TITC_CONTAB'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_CONTAB'
      Size = 1
    end
    object tqTitBKP_NUMERO: TStringField
      FieldName = 'BKP_NUMERO'
      Origin = 'INDUSTRIAL.BACKUP_VENDA.BKP_NUMERO'
      Size = 9
    end
    object tqTitBKP_SERIE: TStringField
      FieldName = 'BKP_SERIE'
      Origin = 'INDUSTRIAL.BACKUP_VENDA.BKP_SERIE'
      Size = 3
    end
    object tqTitPZDIAS: TFloatField
      FieldName = 'PZDIAS'
    end
    object tqTitPZDIAS1: TFloatField
      FieldName = 'PZDIAS1'
    end
    object tqTitTITC_NOSSONUM: TStringField
      FieldName = 'TITC_NOSSONUM'
    end
  end
  object dtTit: TDataSource
    DataSet = cdsTit
    Left = 92
    Top = 437
  end
  object tq: TQuery
    DatabaseName = 'industrial'
    Left = 590
    Top = 1
  end
  object tqTrans: TQuery
    Active = True
    DatabaseName = 'industrial'
    SQL.Strings = (
      'Select Tran_Codigo, Tran_Nome from Transportadora')
    Left = 646
    Top = 1
    object tqTransTRAN_CODIGO: TStringField
      FieldName = 'TRAN_CODIGO'
      Origin = 'INDUSTRIAL.TRANSPORTADORA.TRAN_CODIGO'
      Size = 3
    end
    object tqTransTRAN_NOME: TStringField
      FieldName = 'TRAN_NOME'
      Origin = 'INDUSTRIAL.TRANSPORTADORA.TRAN_NOME'
      Size = 40
    end
  end
  object tqDivisao: TQuery
    Active = True
    DatabaseName = 'industrial'
    SQL.Strings = (
      'Select * from Divisao')
    Left = 674
    Top = 1
    object tqDivisaoDIV_CODIGO: TStringField
      FieldName = 'DIV_CODIGO'
      Origin = 'INDUSTRIAL.DIVISAO.DIV_CODIGO'
      Size = 2
    end
    object tqDivisaoDIV_DESCRICAO: TStringField
      FieldName = 'DIV_DESCRICAO'
      Origin = 'INDUSTRIAL.DIVISAO.DIV_DESCRICAO'
      Size = 30
    end
  end
  object tqRegiao: TQuery
    Active = True
    DatabaseName = 'industrial'
    SQL.Strings = (
      'Select * from REGRASPAGTO')
    Left = 702
    Top = 1
    object tqRegiaoREG_CODIGO: TStringField
      FieldName = 'REG_CODIGO'
      Origin = 'INDUSTRIAL.REGRASPAGTO.REG_CODIGO'
      Size = 3
    end
    object tqRegiaoREG_DESCRICAO: TStringField
      FieldName = 'REG_DESCRICAO'
      Origin = 'INDUSTRIAL.REGRASPAGTO.REG_DESCRICAO'
      Size = 50
    end
    object tqRegiaoREG_NUMPGTO: TFloatField
      FieldName = 'REG_NUMPGTO'
      Origin = 'INDUSTRIAL.REGRASPAGTO.REG_NUMPGTO'
    end
    object tqRegiaoREG_POSICAOIPI: TFloatField
      FieldName = 'REG_POSICAOIPI'
      Origin = 'INDUSTRIAL.REGRASPAGTO.REG_POSICAOIPI'
    end
  end
  object tqRepr: TQuery
    Active = True
    DatabaseName = 'industrial'
    SQL.Strings = (
      'Select Rep_Codigo, rep_nome from Representante')
    Left = 730
    Top = 1
    object tqReprREP_CODIGO: TStringField
      FieldName = 'REP_CODIGO'
      Origin = 'INDUSTRIAL.REPRESENTANTE.REP_CODIGO'
      Size = 3
    end
    object tqReprREP_NOME: TStringField
      FieldName = 'REP_NOME'
      Origin = 'INDUSTRIAL.REPRESENTANTE.REP_NOME'
      Size = 40
    end
  end
  object tqProd: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      'Select * from produto')
    Left = 758
    Top = 1
    object tqProdPRO_CODIGO: TStringField
      FieldName = 'PRO_CODIGO'
      Origin = 'INDUSTRIAL.PRODUTO.PRO_CODIGO'
      Size = 15
    end
    object tqProdNBM_CODIGO: TStringField
      FieldName = 'NBM_CODIGO'
      Origin = 'INDUSTRIAL.PRODUTO.NBM_CODIGO'
      Size = 3
    end
    object tqProdPRO_NOME: TStringField
      FieldName = 'PRO_NOME'
      Origin = 'INDUSTRIAL.PRODUTO.PRO_NOME'
      Size = 40
    end
    object tqProdPRO_UNIDADE: TStringField
      FieldName = 'PRO_UNIDADE'
      Origin = 'INDUSTRIAL.PRODUTO.PRO_UNIDADE'
      Size = 3
    end
    object tqProdPRO_CODTRIBUTARIO: TStringField
      FieldName = 'PRO_CODTRIBUTARIO'
      Origin = 'INDUSTRIAL.PRODUTO.PRO_CODTRIBUTARIO'
      Size = 3
    end
    object tqProdPRO_ALIQIPI: TFloatField
      FieldName = 'PRO_ALIQIPI'
      Origin = 'INDUSTRIAL.PRODUTO.PRO_ALIQIPI'
    end
    object tqProdPRO_CUSTOMEDIO: TFloatField
      FieldName = 'PRO_CUSTOMEDIO'
      Origin = 'INDUSTRIAL.PRODUTO.PRO_CUSTOMEDIO'
    end
    object tqProdPRO_VOLUME: TFloatField
      FieldName = 'PRO_VOLUME'
      Origin = 'INDUSTRIAL.PRODUTO.PRO_VOLUME'
    end
    object tqProdPRO_ALIQICMS: TFloatField
      FieldName = 'PRO_ALIQICMS'
      Origin = 'INDUSTRIAL.PRODUTO.PRO_ALIQICMS'
    end
    object tqProdPRO_CODREF: TStringField
      FieldName = 'PRO_CODREF'
      Origin = 'INDUSTRIAL.PRODUTO.PRO_CODREF'
      Size = 10
    end
  end
  object tqPedAss: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      
        'Select p.*, bkp_pedido from PedidosVenda P, Backup_Pedido B, par' +
        'ametros t'
      
        'where (p.Ped_Numero = b.Ped_Numero and p.Ent_codigo = b.Ent_Codi' +
        'go)'
      'and p.TIPP_CODIGO = t.tipp_asstec and Ped_Situacao = '#39'P'#39)
    Left = 8
    Top = 157
    object StringField33: TStringField
      FieldName = 'PED_NUMERO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_NUMERO'
      Size = 9
    end
    object StringField34: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.ENT_CODIGO'
      Size = 5
    end
    object StringField35: TStringField
      FieldName = 'CONF_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.CONF_CODIGO'
      Size = 2
    end
    object StringField36: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.EMP_CODIGO'
      Size = 3
    end
    object StringField37: TStringField
      FieldName = 'DIV_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.DIV_CODIGO'
      Size = 2
    end
    object StringField38: TStringField
      FieldName = 'COD_USUA'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.COD_USUA'
      Size = 10
    end
    object StringField39: TStringField
      FieldName = 'MOE_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.MOE_CODIGO'
      Size = 2
    end
    object StringField40: TStringField
      FieldName = 'TRAN_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.TRAN_CODIGO'
      Size = 3
    end
    object StringField41: TStringField
      FieldName = 'CANP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.CANP_CODIGO'
      Size = 3
    end
    object StringField42: TStringField
      FieldName = 'REG_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.REG_CODIGO'
      Size = 3
    end
    object StringField43: TStringField
      FieldName = 'TIPP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.TIPP_CODIGO'
      Size = 2
    end
    object StringField44: TStringField
      FieldName = 'SUP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.SUP_CODIGO'
      Size = 3
    end
    object StringField45: TStringField
      FieldName = 'REP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.REP_CODIGO'
      Size = 3
    end
    object DateTimeField7: TDateTimeField
      FieldName = 'PED_DATAPED'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATAPED'
    end
    object DateTimeField8: TDateTimeField
      FieldName = 'PED_DATACHE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATACHE'
    end
    object FloatField28: TFloatField
      FieldName = 'PED_COMISREP'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_COMISREP'
    end
    object FloatField29: TFloatField
      FieldName = 'PED_COMISSUP'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_COMISSUP'
    end
    object FloatField30: TFloatField
      FieldName = 'PED_ALIQFINAN'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQFINAN'
    end
    object FloatField31: TFloatField
      FieldName = 'PED_ALIQEMB'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQEMB'
    end
    object FloatField32: TFloatField
      FieldName = 'PED_ALIQFRETE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQFRETE'
    end
    object FloatField33: TFloatField
      FieldName = 'PED_ALIQSEGURO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQSEGURO'
    end
    object StringField46: TStringField
      FieldName = 'PED_TIPOFRETE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_TIPOFRETE'
      Size = 1
    end
    object StringField47: TStringField
      FieldName = 'PED_OBS'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_OBS'
      Size = 40
    end
    object DateTimeField9: TDateTimeField
      FieldName = 'PED_DATADIGI'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATADIGI'
    end
    object StringField48: TStringField
      FieldName = 'PED_PEDCLIE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PEDCLIE'
      Size = 9
    end
    object StringField49: TStringField
      FieldName = 'PED_PEDREPRE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PEDREPRE'
      Size = 9
    end
    object FloatField34: TFloatField
      FieldName = 'PED_VALOR'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_VALOR'
    end
    object FloatField35: TFloatField
      FieldName = 'PED_TOTALPROD'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_TOTALPROD'
    end
    object FloatField36: TFloatField
      FieldName = 'PED_QTDEEMB'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_QTDEEMB'
    end
    object FloatField37: TFloatField
      FieldName = 'PED_PESOLIQ'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PESOLIQ'
    end
    object FloatField38: TFloatField
      FieldName = 'PED_PESOBRU'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PESOBRU'
    end
    object FloatField39: TFloatField
      FieldName = 'PED_NUMPGTOS'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_NUMPGTOS'
    end
    object FloatField40: TFloatField
      FieldName = 'PED_PRAZOMEDIO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PRAZOMEDIO'
    end
    object StringField50: TStringField
      FieldName = 'PED_LIBERADO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_LIBERADO'
      Size = 1
    end
    object StringField51: TStringField
      FieldName = 'PED_CONFERIDO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_CONFERIDO'
      Size = 1
    end
    object DateTimeField10: TDateTimeField
      FieldName = 'PED_ULTALTERACAO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ULTALTERACAO'
    end
    object StringField52: TStringField
      FieldName = 'PED_SITUACAO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_SITUACAO'
      Size = 1
    end
    object FloatField41: TFloatField
      FieldName = 'PED_ALIQDESC'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQDESC'
    end
    object FloatField42: TFloatField
      FieldName = 'PED_DESCONTO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DESCONTO'
    end
    object DateTimeField11: TDateTimeField
      FieldName = 'PED_DATACANC'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATACANC'
    end
    object StringField53: TStringField
      FieldName = 'BKP_PEDIDO'
      Origin = 'INDUSTRIAL.BACKUP_PEDIDO.BKP_PEDIDO'
      Size = 9
    end
    object StringField54: TStringField
      FieldKind = fkLookup
      FieldName = 'Representante'
      LookupDataSet = tqRepr
      LookupKeyFields = 'REP_CODIGO'
      LookupResultField = 'REP_NOME'
      KeyFields = 'REP_CODIGO'
      Size = 40
      Lookup = True
    end
    object StringField55: TStringField
      FieldKind = fkLookup
      FieldName = 'Divisao'
      LookupDataSet = tqDivisao
      LookupKeyFields = 'DIV_CODIGO'
      LookupResultField = 'DIV_DESCRICAO'
      KeyFields = 'DIV_CODIGO'
      Lookup = True
    end
    object StringField56: TStringField
      FieldKind = fkLookup
      FieldName = 'Transportadora'
      LookupDataSet = tqTrans
      LookupKeyFields = 'TRAN_CODIGO'
      LookupResultField = 'TRAN_NOME'
      KeyFields = 'TRAN_CODIGO'
      Size = 40
      Lookup = True
    end
    object StringField57: TStringField
      FieldKind = fkLookup
      FieldName = 'Regra'
      LookupDataSet = tqRegiao
      LookupKeyFields = 'REG_CODIGO'
      LookupResultField = 'REG_DESCRICAO'
      KeyFields = 'REG_CODIGO'
      Size = 40
      Lookup = True
    end
  end
  object tqItemPedAss: TQuery
    DatabaseName = 'industrial'
    DataSource = dtPedAss
    SQL.Strings = (
      'Select * from itemPedVenda'
      'where Ped_Numero = :Ped_Numero')
    Left = 8
    Top = 185
    ParamData = <
      item
        DataType = ftString
        Name = 'PED_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end>
    object StringField1: TStringField
      FieldName = 'PED_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PED_NUMERO'
      Size = 9
    end
    object StringField2: TStringField
      FieldName = 'PED_ITEM'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PED_ITEM'
      Size = 2
    end
    object StringField3: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.NOTA_SERIE'
      Size = 3
    end
    object StringField4: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.NOTA_NUMERO'
      Size = 9
    end
    object StringField5: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ENT_CODIGO'
      Size = 5
    end
    object StringField6: TStringField
      FieldName = 'ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITNV_ITEM'
      Size = 2
    end
    object StringField7: TStringField
      FieldName = 'PRO_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PRO_CODIGO'
      Size = 15
    end
    object StringField8: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.EMP_CODIGO'
      Size = 3
    end
    object StringField9: TStringField
      FieldName = 'ORD_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ORD_NUMERO'
      Size = 6
    end
    object FloatField1: TFloatField
      FieldName = 'ITPV_QUANTIDADE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_QUANTIDADE'
    end
    object FloatField2: TFloatField
      FieldName = 'ITPV_VALORUNIT'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_VALORUNIT'
    end
    object FloatField3: TFloatField
      FieldName = 'ITPV_ALIQDESC'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQDESC'
    end
    object FloatField4: TFloatField
      FieldName = 'ITPV_ALIQIPI'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQIPI'
    end
    object FloatField5: TFloatField
      FieldName = 'ITPV_COMISREP'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_COMISREP'
    end
    object FloatField6: TFloatField
      FieldName = 'ITPV_PRECOGERADO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PRECOGERADO'
    end
    object FloatField7: TFloatField
      FieldName = 'ITPV_PENDENTE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PENDENTE'
    end
    object DateTimeField1: TDateTimeField
      FieldName = 'ITPV_PREVISAO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PREVISAO'
    end
    object FloatField8: TFloatField
      FieldName = 'ITPV_DESC2'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC2'
    end
    object FloatField9: TFloatField
      FieldName = 'ITPV_DESC3'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC3'
    end
    object FloatField10: TFloatField
      FieldName = 'ITPV_DESC4'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC4'
    end
    object FloatField11: TFloatField
      FieldName = 'ITPV_DESC5'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC5'
    end
    object FloatField12: TFloatField
      FieldName = 'ITPV_ALIQICMS'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQICMS'
    end
    object StringField10: TStringField
      FieldName = 'ICMS_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ICMS_CODIGO'
      Size = 2
    end
    object StringField11: TStringField
      FieldName = 'ITPV_CODTRIBUTARIO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_CODTRIBUTARIO'
      Size = 3
    end
    object StringField12: TStringField
      FieldKind = fkLookup
      FieldName = 'Produto'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_NOME'
      KeyFields = 'PRO_CODIGO'
      Size = 40
      Lookup = True
    end
    object tqItemPedAssCF: TStringField
      FieldKind = fkLookup
      FieldName = 'CF'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'NBM_CODIGO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object tqItemPedAssCST: TStringField
      FieldKind = fkLookup
      FieldName = 'CST'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_CODTRIBUTARIO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object tqItemPedAssUND: TStringField
      FieldKind = fkLookup
      FieldName = 'UND'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_UNIDADE'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
  end
  object tqNotaAss: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      
        'Select p.*, bkp_pedido, n.tran_codigo Trans, n.notv_datafat dtFa' +
        't'
      
        'from PedidosVenda P, Backup_Pedido B, parametros t, movitempedve' +
        'nda m,'
      'notavenda n'
      'where p.ped_numero = m.ped_numero '
      'and m.nota_numero = n.nota_numero and'
      '(p.Ped_Numero = b.Ped_Numero and p.Ent_codigo = b.Ent_Codigo)'
      'and p.TIPP_CODIGO = t.tipp_asstec and Ped_Situacao = '#39'F'#39)
    Left = 8
    Top = 213
    object StringField59: TStringField
      FieldKind = fkLookup
      FieldName = 'Divisao'
      LookupDataSet = tqDivisao
      LookupKeyFields = 'DIV_CODIGO'
      LookupResultField = 'DIV_DESCRICAO'
      KeyFields = 'DIV_CODIGO'
      Lookup = True
    end
    object StringField60: TStringField
      FieldKind = fkLookup
      FieldName = 'Transportadora'
      LookupDataSet = tqTrans
      LookupKeyFields = 'TRAN_CODIGO'
      LookupResultField = 'TRAN_NOME'
      KeyFields = 'TRANS'
      Size = 40
      Lookup = True
    end
    object StringField61: TStringField
      FieldKind = fkLookup
      FieldName = 'Regra'
      LookupDataSet = tqRegiao
      LookupKeyFields = 'REG_CODIGO'
      LookupResultField = 'REG_DESCRICAO'
      KeyFields = 'REG_CODIGO'
      Size = 40
      Lookup = True
    end
    object StringField62: TStringField
      FieldKind = fkLookup
      FieldName = 'Representante'
      LookupDataSet = tqRepr
      LookupKeyFields = 'REP_CODIGO'
      LookupResultField = 'REP_NOME'
      KeyFields = 'REP_CODIGO'
      Size = 40
      Lookup = True
    end
    object tqNotaAssPED_NUMERO: TStringField
      FieldName = 'PED_NUMERO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_NUMERO'
      Size = 9
    end
    object tqNotaAssENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.ENT_CODIGO'
      Size = 5
    end
    object tqNotaAssCONF_CODIGO: TStringField
      FieldName = 'CONF_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.CONF_CODIGO'
      Size = 2
    end
    object tqNotaAssEMP_CODIGO: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.EMP_CODIGO'
      Size = 3
    end
    object tqNotaAssDIV_CODIGO: TStringField
      FieldName = 'DIV_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.DIV_CODIGO'
      Size = 2
    end
    object tqNotaAssCOD_USUA: TStringField
      FieldName = 'COD_USUA'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.COD_USUA'
      Size = 10
    end
    object tqNotaAssMOE_CODIGO: TStringField
      FieldName = 'MOE_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.MOE_CODIGO'
      Size = 2
    end
    object tqNotaAssTRAN_CODIGO: TStringField
      FieldName = 'TRAN_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.TRAN_CODIGO'
      Size = 3
    end
    object tqNotaAssCANP_CODIGO: TStringField
      FieldName = 'CANP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.CANP_CODIGO'
      Size = 3
    end
    object tqNotaAssREG_CODIGO: TStringField
      FieldName = 'REG_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.REG_CODIGO'
      Size = 3
    end
    object tqNotaAssTIPP_CODIGO: TStringField
      FieldName = 'TIPP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.TIPP_CODIGO'
      Size = 2
    end
    object tqNotaAssSUP_CODIGO: TStringField
      FieldName = 'SUP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.SUP_CODIGO'
      Size = 3
    end
    object tqNotaAssREP_CODIGO: TStringField
      FieldName = 'REP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.REP_CODIGO'
      Size = 3
    end
    object tqNotaAssPED_DATAPED: TDateTimeField
      FieldName = 'PED_DATAPED'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATAPED'
    end
    object tqNotaAssPED_DATACHE: TDateTimeField
      FieldName = 'PED_DATACHE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATACHE'
    end
    object tqNotaAssPED_COMISREP: TFloatField
      FieldName = 'PED_COMISREP'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_COMISREP'
    end
    object tqNotaAssPED_COMISSUP: TFloatField
      FieldName = 'PED_COMISSUP'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_COMISSUP'
    end
    object tqNotaAssPED_ALIQFINAN: TFloatField
      FieldName = 'PED_ALIQFINAN'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQFINAN'
    end
    object tqNotaAssPED_ALIQEMB: TFloatField
      FieldName = 'PED_ALIQEMB'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQEMB'
    end
    object tqNotaAssPED_ALIQFRETE: TFloatField
      FieldName = 'PED_ALIQFRETE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQFRETE'
    end
    object tqNotaAssPED_ALIQSEGURO: TFloatField
      FieldName = 'PED_ALIQSEGURO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQSEGURO'
    end
    object tqNotaAssPED_TIPOFRETE: TStringField
      FieldName = 'PED_TIPOFRETE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_TIPOFRETE'
      Size = 1
    end
    object tqNotaAssPED_OBS: TStringField
      FieldName = 'PED_OBS'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_OBS'
      Size = 40
    end
    object tqNotaAssPED_DATADIGI: TDateTimeField
      FieldName = 'PED_DATADIGI'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATADIGI'
    end
    object tqNotaAssPED_PEDCLIE: TStringField
      FieldName = 'PED_PEDCLIE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PEDCLIE'
      Size = 9
    end
    object tqNotaAssPED_PEDREPRE: TStringField
      FieldName = 'PED_PEDREPRE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PEDREPRE'
      Size = 9
    end
    object tqNotaAssPED_VALOR: TFloatField
      FieldName = 'PED_VALOR'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_VALOR'
    end
    object tqNotaAssPED_TOTALPROD: TFloatField
      FieldName = 'PED_TOTALPROD'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_TOTALPROD'
    end
    object tqNotaAssPED_QTDEEMB: TFloatField
      FieldName = 'PED_QTDEEMB'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_QTDEEMB'
    end
    object tqNotaAssPED_PESOLIQ: TFloatField
      FieldName = 'PED_PESOLIQ'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PESOLIQ'
    end
    object tqNotaAssPED_PESOBRU: TFloatField
      FieldName = 'PED_PESOBRU'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PESOBRU'
    end
    object tqNotaAssPED_NUMPGTOS: TFloatField
      FieldName = 'PED_NUMPGTOS'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_NUMPGTOS'
    end
    object tqNotaAssPED_PRAZOMEDIO: TFloatField
      FieldName = 'PED_PRAZOMEDIO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PRAZOMEDIO'
    end
    object tqNotaAssPED_LIBERADO: TStringField
      FieldName = 'PED_LIBERADO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_LIBERADO'
      Size = 1
    end
    object tqNotaAssPED_CONFERIDO: TStringField
      FieldName = 'PED_CONFERIDO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_CONFERIDO'
      Size = 1
    end
    object tqNotaAssPED_ULTALTERACAO: TDateTimeField
      FieldName = 'PED_ULTALTERACAO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ULTALTERACAO'
    end
    object tqNotaAssPED_SITUACAO: TStringField
      FieldName = 'PED_SITUACAO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_SITUACAO'
      Size = 1
    end
    object tqNotaAssPED_ALIQDESC: TFloatField
      FieldName = 'PED_ALIQDESC'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQDESC'
    end
    object tqNotaAssPED_DESCONTO: TFloatField
      FieldName = 'PED_DESCONTO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DESCONTO'
    end
    object tqNotaAssPED_DATACANC: TDateTimeField
      FieldName = 'PED_DATACANC'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATACANC'
    end
    object tqNotaAssBKP_PEDIDO: TStringField
      FieldName = 'BKP_PEDIDO'
      Origin = 'INDUSTRIAL.BACKUP_PEDIDO.BKP_PEDIDO'
      Size = 9
    end
    object tqNotaAssTRANS: TStringField
      FieldName = 'TRANS'
      Origin = 'INDUSTRIAL.NOTAVENDA.TRAN_CODIGO'
      Size = 3
    end
    object tqNotaAssDTFAT: TDateTimeField
      FieldName = 'DTFAT'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DATAFAT'
    end
  end
  object tqItemNotaAss: TQuery
    DatabaseName = 'industrial'
    DataSource = dtNotaAss
    SQL.Strings = (
      
        'Select i.*, bkp_numero, bkp_serie from itemPedVenda i , Backup_V' +
        'enda b'
      'where Ped_Numero = :Ped_Numero'
      'and i.Nota_numero = b.Nota_Numero'
      'and i.Nota_Serie = b.Nota_Serie'
      'and i.Ent_Codigo = b.Ent_Codigo')
    Left = 8
    Top = 241
    ParamData = <
      item
        DataType = ftString
        Name = 'PED_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end>
    object StringField63: TStringField
      FieldName = 'PED_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PED_NUMERO'
      Size = 9
    end
    object StringField64: TStringField
      FieldName = 'PED_ITEM'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PED_ITEM'
      Size = 2
    end
    object StringField65: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.NOTA_SERIE'
      Size = 3
    end
    object StringField66: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.NOTA_NUMERO'
      Size = 9
    end
    object StringField67: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ENT_CODIGO'
      Size = 5
    end
    object StringField68: TStringField
      FieldName = 'ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITNV_ITEM'
      Size = 2
    end
    object StringField69: TStringField
      FieldName = 'PRO_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PRO_CODIGO'
      Size = 15
    end
    object StringField70: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.EMP_CODIGO'
      Size = 3
    end
    object StringField71: TStringField
      FieldName = 'ORD_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ORD_NUMERO'
      Size = 6
    end
    object FloatField43: TFloatField
      FieldName = 'ITPV_QUANTIDADE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_QUANTIDADE'
    end
    object FloatField44: TFloatField
      FieldName = 'ITPV_VALORUNIT'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_VALORUNIT'
    end
    object FloatField45: TFloatField
      FieldName = 'ITPV_ALIQDESC'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQDESC'
    end
    object FloatField46: TFloatField
      FieldName = 'ITPV_ALIQIPI'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQIPI'
    end
    object FloatField47: TFloatField
      FieldName = 'ITPV_COMISREP'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_COMISREP'
    end
    object FloatField48: TFloatField
      FieldName = 'ITPV_PRECOGERADO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PRECOGERADO'
    end
    object FloatField49: TFloatField
      FieldName = 'ITPV_PENDENTE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PENDENTE'
    end
    object DateTimeField12: TDateTimeField
      FieldName = 'ITPV_PREVISAO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PREVISAO'
    end
    object FloatField50: TFloatField
      FieldName = 'ITPV_DESC2'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC2'
    end
    object FloatField51: TFloatField
      FieldName = 'ITPV_DESC3'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC3'
    end
    object FloatField52: TFloatField
      FieldName = 'ITPV_DESC4'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC4'
    end
    object FloatField53: TFloatField
      FieldName = 'ITPV_DESC5'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC5'
    end
    object FloatField54: TFloatField
      FieldName = 'ITPV_ALIQICMS'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQICMS'
    end
    object StringField72: TStringField
      FieldName = 'ICMS_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ICMS_CODIGO'
      Size = 2
    end
    object StringField73: TStringField
      FieldName = 'ITPV_CODTRIBUTARIO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_CODTRIBUTARIO'
      Size = 3
    end
    object StringField74: TStringField
      FieldKind = fkLookup
      FieldName = 'Produto'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_NOME'
      KeyFields = 'PRO_CODIGO'
      Size = 40
      Lookup = True
    end
    object tqItemNotaAssCF: TStringField
      FieldKind = fkLookup
      FieldName = 'CF'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'NBM_CODIGO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object tqItemNotaAssCST: TStringField
      FieldKind = fkLookup
      FieldName = 'CST'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_CODTRIBUTARIO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object tqItemNotaAssUND: TStringField
      FieldKind = fkLookup
      FieldName = 'UND'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_UNIDADE'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object tqItemNotaAssBKP_NUMERO: TStringField
      FieldName = 'BKP_NUMERO'
      Origin = 'INDUSTRIAL.BACKUP_VENDA.BKP_NUMERO'
      Size = 9
    end
    object tqItemNotaAssBKP_SERIE: TStringField
      FieldName = 'BKP_SERIE'
      Origin = 'INDUSTRIAL.BACKUP_VENDA.BKP_SERIE'
      Size = 3
    end
  end
  object tqEntidade: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      'select * from Entidade')
    Left = 534
    Top = 1
    object tqEntidadeENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_CODIGO'
      Size = 5
    end
    object tqEntidadeGRUPO_CODIGO: TStringField
      FieldName = 'GRUPO_CODIGO'
      Origin = 'INDUSTRIAL.ENTIDADE.GRUPO_CODIGO'
      Size = 4
    end
    object tqEntidadeSUP_CODIGO: TStringField
      FieldName = 'SUP_CODIGO'
      Origin = 'INDUSTRIAL.ENTIDADE.SUP_CODIGO'
      Size = 3
    end
    object tqEntidadeENT_CNPJ: TStringField
      FieldName = 'ENT_CNPJ'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_CNPJ'
      Size = 18
    end
    object tqEntidadeREGIAO_CODIGO: TStringField
      FieldName = 'REGIAO_CODIGO'
      Origin = 'INDUSTRIAL.ENTIDADE.REGIAO_CODIGO'
      Size = 3
    end
    object tqEntidadeREP_CODIGO: TStringField
      FieldName = 'REP_CODIGO'
      Origin = 'INDUSTRIAL.ENTIDADE.REP_CODIGO'
      Size = 3
    end
    object tqEntidadeLINHA_CODIGO: TStringField
      FieldName = 'LINHA_CODIGO'
      Origin = 'INDUSTRIAL.ENTIDADE.LINHA_CODIGO'
      Size = 2
    end
    object tqEntidadeLOCAL_CODIGO: TStringField
      FieldName = 'LOCAL_CODIGO'
      Origin = 'INDUSTRIAL.ENTIDADE.LOCAL_CODIGO'
      Size = 3
    end
    object tqEntidadeSUBL_CODIGO: TStringField
      FieldName = 'SUBL_CODIGO'
      Origin = 'INDUSTRIAL.ENTIDADE.SUBL_CODIGO'
      Size = 3
    end
    object tqEntidadeRAMO_CODIGO: TStringField
      FieldName = 'RAMO_CODIGO'
      Origin = 'INDUSTRIAL.ENTIDADE.RAMO_CODIGO'
      Size = 3
    end
    object tqEntidadeENT_NOME: TStringField
      FieldName = 'ENT_NOME'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_NOME'
      Size = 40
    end
    object tqEntidadeENT_FANTASIA: TStringField
      FieldName = 'ENT_FANTASIA'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_FANTASIA'
      Size = 25
    end
    object tqEntidadeENT_INSCEST: TStringField
      FieldName = 'ENT_INSCEST'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_INSCEST'
      Size = 21
    end
    object tqEntidadeENT_STATUS: TStringField
      FieldName = 'ENT_STATUS'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_STATUS'
      Size = 5
    end
    object tqEntidadeENT_DATACAD: TDateTimeField
      FieldName = 'ENT_DATACAD'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_DATACAD'
    end
    object tqEntidadeENT_DATAINA: TDateTimeField
      FieldName = 'ENT_DATAINA'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_DATAINA'
    end
    object tqEntidadeENT_LIMITE: TFloatField
      FieldName = 'ENT_LIMITE'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_LIMITE'
    end
    object tqEntidadeENT_EMAIL: TStringField
      FieldName = 'ENT_EMAIL'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_EMAIL'
      Size = 50
    end
    object tqEntidadeENT_OBSERVACAO: TBlobField
      FieldName = 'ENT_OBSERVACAO'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_OBSERVACAO'
      Size = 1
    end
    object tqEntidadeENT_HOMEPAGE: TStringField
      FieldName = 'ENT_HOMEPAGE'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_HOMEPAGE'
      Size = 40
    end
    object tqEntidadeENT_BLOQUEADO: TStringField
      FieldName = 'ENT_BLOQUEADO'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_BLOQUEADO'
      Size = 1
    end
    object tqEntidadeENT_CONTABIL: TStringField
      FieldName = 'ENT_CONTABIL'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_CONTABIL'
      Size = 10
    end
    object tqEntidadeENT_CPF: TStringField
      FieldName = 'ENT_CPF'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_CPF'
      Size = 14
    end
    object tqEntidadeENT_TIPO: TFloatField
      FieldName = 'ENT_TIPO'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_TIPO'
    end
    object tqEntidadeENT_TIPOENT: TFloatField
      FieldName = 'ENT_TIPOENT'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_TIPOENT'
    end
    object tqEntidadeENT_HOMOLOGADO: TStringField
      FieldName = 'ENT_HOMOLOGADO'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_HOMOLOGADO'
      Size = 1
    end
    object tqEntidadeENT_RG: TStringField
      FieldName = 'ENT_RG'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_RG'
      Size = 11
    end
    object tqEntidadeENT_NASC: TDateTimeField
      FieldName = 'ENT_NASC'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_NASC'
    end
    object tqEntidadeENT_CONTABIL2: TStringField
      FieldName = 'ENT_CONTABIL2'
      Origin = 'INDUSTRIAL.ENTIDADE.ENT_CONTABIL2'
      Size = 10
    end
    object tqEntidadeRepresentante: TStringField
      FieldKind = fkLookup
      FieldName = 'Representante'
      LookupDataSet = tqRepr
      LookupKeyFields = 'REP_CODIGO'
      LookupResultField = 'REP_NOME'
      KeyFields = 'REP_CODIGO'
      Lookup = True
    end
  end
  object tqEndereco: TQuery
    DatabaseName = 'industrial'
    DataSource = dsEntidade
    SQL.Strings = (
      'Select * from Endereco E, Cidade C'
      'where e.Cid_Codigo = c.Cid_Codigo'
      'and E.Ent_Codigo =:Ent_Codigo')
    Left = 562
    Top = 1
    ParamData = <
      item
        DataType = ftString
        Name = 'ENT_CODIGO'
        ParamType = ptUnknown
        Size = 6
      end>
    object tqEnderecoENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.ENDERECO.ENT_CODIGO'
      Size = 5
    end
    object tqEnderecoTIPEND_CODIGO: TStringField
      FieldName = 'TIPEND_CODIGO'
      Origin = 'INDUSTRIAL.ENDERECO.TIPEND_CODIGO'
      Size = 2
    end
    object tqEnderecoEND_CODIGO: TStringField
      FieldName = 'END_CODIGO'
      Origin = 'INDUSTRIAL.ENDERECO.END_CODIGO'
      Size = 2
    end
    object tqEnderecoCID_CODIGO: TStringField
      FieldName = 'CID_CODIGO'
      Origin = 'INDUSTRIAL.ENDERECO.CID_CODIGO'
      Size = 4
    end
    object tqEnderecoEND_ENDERECO: TStringField
      FieldName = 'END_ENDERECO'
      Origin = 'INDUSTRIAL.ENDERECO.END_ENDERECO'
      Size = 40
    end
    object tqEnderecoEND_BAIRRO: TStringField
      FieldName = 'END_BAIRRO'
      Origin = 'INDUSTRIAL.ENDERECO.END_BAIRRO'
      Size = 25
    end
    object tqEnderecoEND_CEP: TStringField
      FieldName = 'END_CEP'
      Origin = 'INDUSTRIAL.ENDERECO.END_CEP'
      Size = 9
    end
    object tqEnderecoEND_FONE: TStringField
      FieldName = 'END_FONE'
      Origin = 'INDUSTRIAL.ENDERECO.END_FONE'
      Size = 13
    end
    object tqEnderecoEND_FAX: TStringField
      FieldName = 'END_FAX'
      Origin = 'INDUSTRIAL.ENDERECO.END_FAX'
      Size = 13
    end
    object tqEnderecoCID_CODIGO_1: TStringField
      FieldName = 'CID_CODIGO_1'
      Origin = 'INDUSTRIAL.ENDERECO.END_FAX'
      Size = 4
    end
    object tqEnderecoPAIS_CODIGO: TStringField
      FieldName = 'PAIS_CODIGO'
      Origin = 'INDUSTRIAL.ENDERECO.END_FAX'
      Size = 2
    end
    object tqEnderecoEST_SIGLA: TStringField
      FieldName = 'EST_SIGLA'
      Origin = 'INDUSTRIAL.ENDERECO.END_FAX'
      Size = 2
    end
    object tqEnderecoCID_NOME: TStringField
      FieldName = 'CID_NOME'
      Origin = 'INDUSTRIAL.ENDERECO.END_FAX'
      Size = 25
    end
    object tqEnderecoCID_DDD: TStringField
      FieldName = 'CID_DDD'
      Origin = 'INDUSTRIAL.ENDERECO.END_FAX'
      Size = 4
    end
    object tqEnderecoCID_CEP: TStringField
      FieldName = 'CID_CEP'
      Origin = 'INDUSTRIAL.ENDERECO.END_FAX'
      Size = 9
    end
  end
  object dsEntidade: TDataSource
    DataSet = tqEntidade
    Left = 534
    Top = 29
  end
  object dsEndereco: TDataSource
    DataSet = tqEndereco
    Left = 562
    Top = 29
  end
  object dsDescPed: TDataSource
    DataSet = tqDescPed
    Left = 64
    Top = 325
  end
  object tqDescPed: TQuery
    DatabaseName = 'industrial'
    DataSource = dtPed
    SQL.Strings = (
      'Select * from PedTabela'
      'where Ped_Numero =:Ped_Numero')
    Left = 92
    Top = 325
    ParamData = <
      item
        DataType = ftString
        Name = 'PED_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end>
    object tqDescPedPEDT_DESC1: TFloatField
      FieldName = 'PEDT_DESC1'
      Origin = 'INDUSTRIAL.PEDTABELA.PEDT_DESC1'
    end
    object tqDescPedPEDT_DESC2: TFloatField
      FieldName = 'PEDT_DESC2'
      Origin = 'INDUSTRIAL.PEDTABELA.PEDT_DESC2'
    end
    object tqDescPedPEDT_DESC3: TFloatField
      FieldName = 'PEDT_DESC3'
      Origin = 'INDUSTRIAL.PEDTABELA.PEDT_DESC3'
    end
    object tqDescPedPEDT_DESC4: TFloatField
      FieldName = 'PEDT_DESC4'
      Origin = 'INDUSTRIAL.PEDTABELA.PEDT_DESC4'
    end
    object tqDescPedPEDT_DESC5: TFloatField
      FieldName = 'PEDT_DESC5'
      Origin = 'INDUSTRIAL.PEDTABELA.PEDT_DESC5'
    end
    object tqDescPedPEDT_DESC6: TFloatField
      FieldName = 'PEDT_DESC6'
      Origin = 'INDUSTRIAL.PEDTABELA.PEDT_DESC6'
    end
    object tqDescPedPEDT_DESC7: TFloatField
      FieldName = 'PEDT_DESC7'
      Origin = 'INDUSTRIAL.PEDTABELA.PEDT_DESC7'
    end
    object tqDescPedPEDT_DESC8: TFloatField
      FieldName = 'PEDT_DESC8'
      Origin = 'INDUSTRIAL.PEDTABELA.PEDT_DESC8'
    end
    object tqDescPedPEDT_DESC9: TFloatField
      FieldName = 'PEDT_DESC9'
      Origin = 'INDUSTRIAL.PEDTABELA.PEDT_DESC9'
    end
    object tqDescPedPEDT_DESC10: TFloatField
      FieldName = 'PEDT_DESC10'
      Origin = 'INDUSTRIAL.PEDTABELA.PEDT_DESC10'
    end
  end
  object dsDescNota: TDataSource
    DataSet = tqDescNota
    Left = 64
    Top = 381
  end
  object tqDescNota: TQuery
    DatabaseName = 'industrial'
    DataSource = dtNota
    SQL.Strings = (
      'Select * from PedTabela'
      'where Ped_Numero =:Ped_Numero')
    Left = 92
    Top = 381
    ParamData = <
      item
        DataType = ftString
        Name = 'PED_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end>
  end
  object tqNF: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      'Select Bkp_Numero, N.*, Tran_Nome'
      'from NotaVenda N, Backup_Venda B, transportadora T'
      
        'where (N.Nota_Numero = B.Nota_Numero and N.Ent_Codigo = B.Ent_Co' +
        'digo) '
      'and N.Tran_Codigo = T.Tran_Codigo'
      'order by Bkp_Numero')
    Left = 656
    Top = 157
    object tqNFBKP_NUMERO: TStringField
      FieldName = 'BKP_NUMERO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTA_SERIE'
      Size = 9
    end
    object tqNFNOTA_SERIE: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTA_NUMERO'
      Size = 3
    end
    object tqNFNOTA_NUMERO: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.NOTAVENDA.ENT_CODIGO'
      Size = 9
    end
    object tqNFENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.EMP_CODIGO'
      Size = 5
    end
    object tqNFEMP_CODIGO: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.TRAN_CODIGO'
      Size = 3
    end
    object tqNFTRAN_CODIGO: TStringField
      FieldName = 'TRAN_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.TRAN_CODIGO_REDESPACHO'
      Size = 3
    end
    object tqNFTRAN_CODIGO_REDESPACHO: TStringField
      FieldName = 'TRAN_CODIGO_REDESPACHO'
      Origin = 'INDUSTRIAL.NOTAVENDA.HIST_CODIGO'
      Size = 3
    end
    object tqNFHIST_CODIGO: TStringField
      FieldName = 'HIST_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.MOE_CODIGO'
      Size = 10
    end
    object tqNFMOE_CODIGO: TStringField
      FieldName = 'MOE_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.SUP_CODIGO'
      Size = 2
    end
    object tqNFSUP_CODIGO: TStringField
      FieldName = 'SUP_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.REP_CODIGO'
      Size = 3
    end
    object tqNFREP_CODIGO: TStringField
      FieldName = 'REP_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.DIV_CODIGO'
      Size = 3
    end
    object tqNFDIV_CODIGO: TStringField
      FieldName = 'DIV_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.CONF_CODIGO'
      Size = 2
    end
    object tqNFCONF_CODIGO: TStringField
      FieldName = 'CONF_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.CODF_CODIGO'
      Size = 2
    end
    object tqNFCODF_CODIGO: TStringField
      FieldName = 'CODF_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NATO_CODIGO'
      Size = 5
    end
    object tqNFNATO_CODIGO: TStringField
      FieldName = 'NATO_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.REG_CODIGO'
      Size = 2
    end
    object tqNFREG_CODIGO: TStringField
      FieldName = 'REG_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_COMISREP'
      Size = 3
    end
    object tqNFNOTV_COMISREP: TFloatField
      FieldName = 'NOTV_COMISREP'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_COMISSUP'
    end
    object tqNFNOTV_COMISSUP: TFloatField
      FieldName = 'NOTV_COMISSUP'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_OBSERVACAO'
    end
    object tqNFNOTV_OBSERVACAO: TStringField
      FieldName = 'NOTV_OBSERVACAO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQIPI'
      Size = 40
    end
    object tqNFNOTV_ALIQIPI: TFloatField
      FieldName = 'NOTV_ALIQIPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQICMS'
    end
    object tqNFNOTV_ALIQICMS: TFloatField
      FieldName = 'NOTV_ALIQICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQICMSUBS'
    end
    object tqNFNOTV_ALIQICMSUBS: TFloatField
      FieldName = 'NOTV_ALIQICMSUBS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQDESCICM'
    end
    object tqNFNOTV_ALIQDESCICM: TFloatField
      FieldName = 'NOTV_ALIQDESCICM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQEMB'
    end
    object tqNFNOTV_ALIQEMB: TFloatField
      FieldName = 'NOTV_ALIQEMB'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQENC'
    end
    object tqNFNOTV_ALIQENC: TFloatField
      FieldName = 'NOTV_ALIQENC'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQSEGURO'
    end
    object tqNFNOTV_ALIQSEGURO: TFloatField
      FieldName = 'NOTV_ALIQSEGURO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQDESCONTO'
    end
    object tqNFNOTV_ALIQDESCONTO: TFloatField
      FieldName = 'NOTV_ALIQDESCONTO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_FRETE'
    end
    object tqNFNOTV_FRETE: TFloatField
      FieldName = 'NOTV_FRETE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQFRETE'
    end
    object tqNFNOTV_ALIQFRETE: TFloatField
      FieldName = 'NOTV_ALIQFRETE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_TOTALPRODUTO'
    end
    object tqNFNOTV_TOTALPRODUTO: TFloatField
      FieldName = 'NOTV_TOTALPRODUTO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_TOTALDESCONTO'
    end
    object tqNFNOTV_TOTALDESCONTO: TFloatField
      FieldName = 'NOTV_TOTALDESCONTO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_EMBALAGEM'
    end
    object tqNFNOTV_EMBALAGEM: TFloatField
      FieldName = 'NOTV_EMBALAGEM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ENCARGOS'
    end
    object tqNFNOTV_ENCARGOS: TFloatField
      FieldName = 'NOTV_ENCARGOS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_BCALIPI'
    end
    object tqNFNOTV_BCALIPI: TFloatField
      FieldName = 'NOTV_BCALIPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_BCALICMS'
    end
    object tqNFNOTV_BCALICMS: TFloatField
      FieldName = 'NOTV_BCALICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_BCALICMSUBS'
    end
    object tqNFNOTV_BCALICMSUBS: TFloatField
      FieldName = 'NOTV_BCALICMSUBS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_BCALDESCICM'
    end
    object tqNFNOTV_BCALDESCICM: TFloatField
      FieldName = 'NOTV_BCALDESCICM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_SEGURO'
    end
    object tqNFNOTV_SEGURO: TFloatField
      FieldName = 'NOTV_SEGURO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_IPI'
    end
    object tqNFNOTV_IPI: TFloatField
      FieldName = 'NOTV_IPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ICMS'
    end
    object tqNFNOTV_ICMS: TFloatField
      FieldName = 'NOTV_ICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ICMSUBS'
    end
    object tqNFNOTV_ICMSUBS: TFloatField
      FieldName = 'NOTV_ICMSUBS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DESCICM'
    end
    object tqNFNOTV_DESCICM: TFloatField
      FieldName = 'NOTV_DESCICM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ISENTAIPI'
    end
    object tqNFNOTV_ISENTAIPI: TFloatField
      FieldName = 'NOTV_ISENTAIPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ISENTAICMS'
    end
    object tqNFNOTV_ISENTAICMS: TFloatField
      FieldName = 'NOTV_ISENTAICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_OUTRASIPI'
    end
    object tqNFNOTV_OUTRASIPI: TFloatField
      FieldName = 'NOTV_OUTRASIPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_OUTRASICMS'
    end
    object tqNFNOTV_OUTRASICMS: TFloatField
      FieldName = 'NOTV_OUTRASICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_VALORCONTABIL'
    end
    object tqNFNOTV_VALORCONTABIL: TFloatField
      FieldName = 'NOTV_VALORCONTABIL'
      Origin = 'INDUSTRIAL.NOTAVENDA.NTOV_BCALCOMISSAOREP'
    end
    object tqNFNTOV_BCALCOMISSAOREP: TFloatField
      FieldName = 'NTOV_BCALCOMISSAOREP'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_QTDEEMB'
    end
    object tqNFNOTV_QTDEEMB: TFloatField
      FieldName = 'NOTV_QTDEEMB'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_PESOLIQ'
    end
    object tqNFNOTV_PESOLIQ: TFloatField
      FieldName = 'NOTV_PESOLIQ'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_PESOBRU'
    end
    object tqNFNOTV_PESOBRU: TFloatField
      FieldName = 'NOTV_PESOBRU'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_SITUACAOTRIB'
    end
    object tqNFNOTV_SITUACAOTRIB: TStringField
      FieldName = 'NOTV_SITUACAOTRIB'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_CONTADEBITO'
      Size = 3
    end
    object tqNFNOTV_CONTADEBITO: TStringField
      FieldName = 'NOTV_CONTADEBITO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_CONTACREDITO'
      Size = 10
    end
    object tqNFNOTV_CONTACREDITO: TStringField
      FieldName = 'NOTV_CONTACREDITO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_PRAZOMEDIO'
      Size = 10
    end
    object tqNFNOTV_PRAZOMEDIO: TFloatField
      FieldName = 'NOTV_PRAZOMEDIO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_NUMPGTOS'
    end
    object tqNFNOTV_NUMPGTOS: TFloatField
      FieldName = 'NOTV_NUMPGTOS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_QTDEITENS'
    end
    object tqNFNOTV_QTDEITENS: TFloatField
      FieldName = 'NOTV_QTDEITENS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ESPEMBALAGEM'
    end
    object tqNFNOTV_ESPEMBALAGEM: TStringField
      FieldName = 'NOTV_ESPEMBALAGEM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_MOTORISTA'
      Size = 10
    end
    object tqNFNOTV_MOTORISTA: TStringField
      FieldName = 'NOTV_MOTORISTA'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_VIATRANSPORTE'
      Size = 30
    end
    object tqNFNOTV_VIATRANSPORTE: TStringField
      FieldName = 'NOTV_VIATRANSPORTE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_MARCAEMP'
      Size = 10
    end
    object tqNFNOTV_MARCAEMP: TStringField
      FieldName = 'NOTV_MARCAEMP'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_PLACAVEIC'
      Size = 14
    end
    object tqNFNOTV_PLACAVEIC: TStringField
      FieldName = 'NOTV_PLACAVEIC'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DATAFAT'
      Size = 8
    end
    object tqNFNOTV_DATAFAT: TDateTimeField
      FieldName = 'NOTV_DATAFAT'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DATAENTRADA'
    end
    object tqNFNOTV_DATAENTRADA: TDateTimeField
      FieldName = 'NOTV_DATAENTRADA'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DATASAIDA'
    end
    object tqNFNOTV_DATASAIDA: TDateTimeField
      FieldName = 'NOTV_DATASAIDA'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_HORASAIDA'
    end
    object tqNFNOTV_HORASAIDA: TStringField
      FieldName = 'NOTV_HORASAIDA'
      Origin = 'INDUSTRIAL.NOTAVENDA.CANP_CODIGO'
      Size = 8
    end
    object tqNFCANP_CODIGO: TStringField
      FieldName = 'CANP_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.IMP_NOTAFISCAL'
      Size = 3
    end
    object tqNFIMP_NOTAFISCAL: TStringField
      FieldName = 'IMP_NOTAFISCAL'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_MENSAGEM'
      Size = 1
    end
    object tqNFNOTV_EMITENTE: TStringField
      FieldName = 'NOTV_EMITENTE'
      Origin = 'INDUSTRIAL.NOTAVENDA.CODF_CODIGO1'
      Size = 1
    end
    object tqNFCODF_CODIGO1: TStringField
      FieldName = 'CODF_CODIGO1'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_FRETEAUT'
      Size = 5
    end
    object tqNFNOTV_FRETEAUT: TFloatField
      FieldName = 'NOTV_FRETEAUT'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQICMSAUT'
    end
    object tqNFNOTV_ALIQICMSAUT: TFloatField
      FieldName = 'NOTV_ALIQICMSAUT'
      Origin = 'INDUSTRIAL.NOTAVENDA.REG_NUMERO'
    end
    object tqNFREG_NUMERO: TStringField
      FieldName = 'REG_NUMERO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_TIPOFRETE'
      Size = 12
    end
    object tqNFNOTV_TIPOFRETE: TStringField
      FieldName = 'NOTV_TIPOFRETE'
      Origin = 'INDUSTRIAL.BACKUP_VENDA.BKP_NUMERO'
      Size = 1
    end
    object tqNFTRAN_NOME: TStringField
      FieldName = 'TRAN_NOME'
      Origin = 'INDUSTRIAL.TRANSPORTADORA.TRAN_NOME'
      Size = 40
    end
    object tqNFRepresentante: TStringField
      FieldKind = fkLookup
      FieldName = 'Representante'
      LookupDataSet = tqRepr
      LookupKeyFields = 'REP_CODIGO'
      LookupResultField = 'REP_NOME'
      KeyFields = 'REP_CODIGO'
      Size = 40
      Lookup = True
    end
    object tqNFDivisao: TStringField
      FieldKind = fkLookup
      FieldName = 'Divisao'
      LookupDataSet = tqDivisao
      LookupKeyFields = 'DIV_CODIGO'
      LookupResultField = 'DIV_DESCRICAO'
      KeyFields = 'DIV_CODIGO'
      Lookup = True
    end
  end
  object tqItNF: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      'Select distinct Bkp_Pedido, I.*'
      ''
      'from ItemNotaVenda I, ItemPedVenda P, Backup_Pedido B'
      ''
      'where ((I.Nota_Numero = P.Nota_Numero and'
      '        I.Nota_Serie = P.Nota_Serie and'
      '        I.Ent_Codigo = P.Ent_Codigo)  or'
      '       (I.Ref_Numero = P.Nota_Numero and'
      '        I.ref_Serie = P.Nota_Serie and'
      '        I.Ent_Codigo = P.Ent_Codigo)) and'
      '       (P.Ped_Numero = B.Ped_Numero and'
      '        P.Ent_Codigo = B.Ent_Codigo) and'
      '       (I.Nota_Numero = :nota_numero and'
      '        I.Nota_Serie = :nota_serie and'
      '        I.ent_codigo = :ent_codigo)'
      ''
      'order by Bkp_Pedido, I.Itnv_Item')
    Left = 712
    Top = 185
    ParamData = <
      item
        DataType = ftString
        Name = 'NOTA_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end
      item
        DataType = ftUnknown
        Name = 'Nota_Serie'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'ent_codigo'
        ParamType = ptUnknown
      end>
    object tqItNFBKP_PEDIDO: TStringField
      FieldName = 'BKP_PEDIDO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.NOTA_SERIE'
      Size = 9
    end
    object tqItNFNOTA_SERIE: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.NOTA_NUMERO'
      Size = 3
    end
    object tqItNFNOTA_NUMERO: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ENT_CODIGO'
      Size = 9
    end
    object tqItNFENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ITEM'
      Size = 5
    end
    object tqItNFITNV_ITEM: TStringField
      FieldName = 'ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_SERIE'
      Size = 2
    end
    object tqItNFREF_SERIE: TStringField
      FieldName = 'REF_SERIE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_NUMERO'
      Size = 3
    end
    object tqItNFREF_NUMERO: TStringField
      FieldName = 'REF_NUMERO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_ENT_CODIGO'
      Size = 9
    end
    object tqItNFREF_ENT_CODIGO: TStringField
      FieldName = 'REF_ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_ITNV_ITEM'
      Size = 5
    end
    object tqItNFREF_ITNV_ITEM: TStringField
      FieldName = 'REF_ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.PRO_CODIGO'
      Size = 2
    end
    object tqItNFPRO_CODIGO: TStringField
      FieldName = 'PRO_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.EMP_CODIGO'
      Size = 15
    end
    object tqItNFEMP_CODIGO: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_QUANTIDADE'
      Size = 3
    end
    object tqItNFITNV_QUANTIDADE: TFloatField
      FieldName = 'ITNV_QUANTIDADE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_VALORUNIT'
    end
    object tqItNFITNV_VALORUNIT: TFloatField
      FieldName = 'ITNV_VALORUNIT'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQDESC'
    end
    object tqItNFITNV_ALIQDESC: TFloatField
      FieldName = 'ITNV_ALIQDESC'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQIPI'
    end
    object tqItNFITNV_ALIQIPI: TFloatField
      FieldName = 'ITNV_ALIQIPI'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DATAFAT'
    end
    object tqItNFITNV_DATAFAT: TDateTimeField
      FieldName = 'ITNV_DATAFAT'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_COMISREP'
    end
    object tqItNFITNV_COMISREP: TFloatField
      FieldName = 'ITNV_COMISREP'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CUSTOMEDIO'
    end
    object tqItNFITNV_CUSTOMEDIO: TFloatField
      FieldName = 'ITNV_CUSTOMEDIO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC2'
    end
    object tqItNFITNV_DESC2: TFloatField
      FieldName = 'ITNV_DESC2'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC3'
    end
    object tqItNFITNV_DESC3: TFloatField
      FieldName = 'ITNV_DESC3'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC4'
    end
    object tqItNFITNV_DESC4: TFloatField
      FieldName = 'ITNV_DESC4'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC5'
    end
    object tqItNFITNV_DESC5: TFloatField
      FieldName = 'ITNV_DESC5'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQICMS'
    end
    object tqItNFITNV_ALIQICMS: TFloatField
      FieldName = 'ITNV_ALIQICMS'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CST'
    end
    object tqItNFITNV_CST: TStringField
      FieldName = 'ITNV_CST'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.CODF_CODIGO'
      Size = 3
    end
    object tqItNFCODF_CODIGO: TStringField
      FieldName = 'CODF_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ICMS_CODIGO'
      Size = 5
    end
    object tqItNFICMS_CODIGO: TStringField
      FieldName = 'ICMS_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CUSTO'
      Size = 2
    end
    object tqItNFITNV_CUSTO: TFloatField
      FieldName = 'ITNV_CUSTO'
      Origin = 'INDUSTRIAL.BACKUP_PEDIDO.BKP_PEDIDO'
    end
    object tqItNFCF: TStringField
      FieldKind = fkLookup
      FieldName = 'CF'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'NBM_CODIGO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object tqItNFCST: TStringField
      FieldKind = fkLookup
      FieldName = 'CST'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_CODTRIBUTARIO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object tqItNFUND: TStringField
      FieldKind = fkLookup
      FieldName = 'UND'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_UNIDADE'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object tqItNFTot: TFloatField
      FieldKind = fkCalculated
      FieldName = 'Tot'
      Calculated = True
    end
    object tqItNFproduto: TStringField
      FieldKind = fkLookup
      FieldName = 'produto'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_NOME'
      KeyFields = 'PRO_CODIGO'
      Size = 40
      Lookup = True
    end
  end
  object tqTitNF: TQuery
    DatabaseName = 'industrial'
    DataSource = dsItNF
    SQL.Strings = (
      'Select * from titcredito'
      'where '
      '((Nota_Numero =:Nota_numero and Nota_Serie =:Nota_Serie and'
      
        'Ent_Codigo =:Ent_Codigo) or (Nota_Numero =:Ref_numero and Nota_S' +
        'erie =:Ref_Serie and'
      'Ent_Codigo =:Ent_Codigo))')
    Left = 712
    Top = 213
    ParamData = <
      item
        DataType = ftString
        Name = 'NOTA_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end
      item
        DataType = ftString
        Name = 'NOTA_SERIE'
        ParamType = ptUnknown
        Size = 4
      end
      item
        DataType = ftString
        Name = 'ENT_CODIGO'
        ParamType = ptUnknown
        Size = 6
      end
      item
        DataType = ftString
        Name = 'REF_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end
      item
        DataType = ftString
        Name = 'REF_SERIE'
        ParamType = ptUnknown
        Size = 4
      end
      item
        DataType = ftString
        Name = 'Ent_Codigo'
        ParamType = ptUnknown
      end>
  end
  object dsNF: TDataSource
    DataSet = cdsNF
    Left = 740
    Top = 157
  end
  object dsItNF: TDataSource
    DataSet = tqItNF
    Left = 740
    Top = 185
  end
  object dsTitNF: TDataSource
    DataSet = tqTitNF
    Left = 740
    Top = 213
  end
  object dspPed: TDataSetProvider
    DataSet = tqPed
    Left = 36
    Top = 297
  end
  object cdsPed: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspPed'
    Left = 64
    Top = 297
    object cdsPedPED_NUMERO: TStringField
      FieldName = 'PED_NUMERO'
      Size = 9
    end
    object cdsPedENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Size = 5
    end
    object cdsPedCONF_CODIGO: TStringField
      FieldName = 'CONF_CODIGO'
      Size = 2
    end
    object cdsPedEMP_CODIGO: TStringField
      FieldName = 'EMP_CODIGO'
      Size = 3
    end
    object cdsPedDIV_CODIGO: TStringField
      FieldName = 'DIV_CODIGO'
      Size = 2
    end
    object cdsPedCOD_USUA: TStringField
      FieldName = 'COD_USUA'
      Size = 10
    end
    object cdsPedMOE_CODIGO: TStringField
      FieldName = 'MOE_CODIGO'
      Size = 2
    end
    object cdsPedTRAN_CODIGO: TStringField
      FieldName = 'TRAN_CODIGO'
      Size = 3
    end
    object cdsPedCANP_CODIGO: TStringField
      FieldName = 'CANP_CODIGO'
      Size = 3
    end
    object cdsPedREG_CODIGO: TStringField
      FieldName = 'REG_CODIGO'
      Size = 3
    end
    object cdsPedTIPP_CODIGO: TStringField
      FieldName = 'TIPP_CODIGO'
      Size = 2
    end
    object cdsPedSUP_CODIGO: TStringField
      FieldName = 'SUP_CODIGO'
      Size = 3
    end
    object cdsPedREP_CODIGO: TStringField
      FieldName = 'REP_CODIGO'
      Size = 3
    end
    object cdsPedPED_DATAPED: TDateTimeField
      FieldName = 'PED_DATAPED'
    end
    object cdsPedPED_DATACHE: TDateTimeField
      FieldName = 'PED_DATACHE'
    end
    object cdsPedPED_COMISREP: TFloatField
      FieldName = 'PED_COMISREP'
    end
    object cdsPedPED_COMISSUP: TFloatField
      FieldName = 'PED_COMISSUP'
    end
    object cdsPedPED_ALIQFINAN: TFloatField
      FieldName = 'PED_ALIQFINAN'
    end
    object cdsPedPED_ALIQEMB: TFloatField
      FieldName = 'PED_ALIQEMB'
    end
    object cdsPedPED_ALIQFRETE: TFloatField
      FieldName = 'PED_ALIQFRETE'
    end
    object cdsPedPED_ALIQSEGURO: TFloatField
      FieldName = 'PED_ALIQSEGURO'
    end
    object cdsPedPED_TIPOFRETE: TStringField
      FieldName = 'PED_TIPOFRETE'
      Size = 1
    end
    object cdsPedPED_OBS: TStringField
      FieldName = 'PED_OBS'
      Size = 40
    end
    object cdsPedPED_DATADIGI: TDateTimeField
      FieldName = 'PED_DATADIGI'
    end
    object cdsPedPED_PEDCLIE: TStringField
      FieldName = 'PED_PEDCLIE'
      Size = 9
    end
    object cdsPedPED_PEDREPRE: TStringField
      FieldName = 'PED_PEDREPRE'
      Size = 9
    end
    object cdsPedPED_VALOR: TFloatField
      FieldName = 'PED_VALOR'
    end
    object cdsPedPED_TOTALPROD: TFloatField
      FieldName = 'PED_TOTALPROD'
    end
    object cdsPedPED_QTDEEMB: TFloatField
      FieldName = 'PED_QTDEEMB'
    end
    object cdsPedPED_PESOLIQ: TFloatField
      FieldName = 'PED_PESOLIQ'
    end
    object cdsPedPED_PESOBRU: TFloatField
      FieldName = 'PED_PESOBRU'
    end
    object cdsPedPED_NUMPGTOS: TFloatField
      FieldName = 'PED_NUMPGTOS'
    end
    object cdsPedPED_PRAZOMEDIO: TFloatField
      FieldName = 'PED_PRAZOMEDIO'
    end
    object cdsPedPED_LIBERADO: TStringField
      FieldName = 'PED_LIBERADO'
      Size = 1
    end
    object cdsPedPED_CONFERIDO: TStringField
      FieldName = 'PED_CONFERIDO'
      Size = 1
    end
    object cdsPedPED_ULTALTERACAO: TDateTimeField
      FieldName = 'PED_ULTALTERACAO'
    end
    object cdsPedPED_SITUACAO: TStringField
      FieldName = 'PED_SITUACAO'
      Size = 1
    end
    object cdsPedPED_ALIQDESC: TFloatField
      FieldName = 'PED_ALIQDESC'
    end
    object cdsPedPED_DESCONTO: TFloatField
      FieldName = 'PED_DESCONTO'
    end
    object cdsPedPED_DATACANC: TDateTimeField
      FieldName = 'PED_DATACANC'
    end
    object cdsPedBKP_PEDIDO: TStringField
      FieldName = 'BKP_PEDIDO'
      Size = 9
    end
    object cdsPedRepresentante: TStringField
      FieldName = 'Representante'
      ReadOnly = True
      Size = 40
    end
    object cdsPedDivisao: TStringField
      FieldName = 'Divisao'
      ReadOnly = True
    end
    object cdsPedTransportadora: TStringField
      FieldName = 'Transportadora'
      ReadOnly = True
      Size = 40
    end
    object cdsPedRegra: TStringField
      FieldName = 'Regra'
      ReadOnly = True
      Size = 40
    end
  end
  object dspNota: TDataSetProvider
    DataSet = tqNota
    Left = 36
    Top = 353
  end
  object cdsNota: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspNota'
    Left = 64
    Top = 353
    object cdsNotaPED_NUMERO: TStringField
      FieldName = 'PED_NUMERO'
      Size = 9
    end
    object cdsNotaENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Size = 5
    end
    object cdsNotaCONF_CODIGO: TStringField
      FieldName = 'CONF_CODIGO'
      Size = 2
    end
    object cdsNotaEMP_CODIGO2: TStringField
      FieldName = 'EMP_CODIGO'
      Size = 3
    end
    object cdsNotaDIV_CODIGO: TStringField
      FieldName = 'DIV_CODIGO'
      Size = 2
    end
    object cdsNotaCOD_USUA: TStringField
      FieldName = 'COD_USUA'
      Size = 10
    end
    object cdsNotaMOE_CODIGO: TStringField
      FieldName = 'MOE_CODIGO'
      Size = 2
    end
    object cdsNotaTRAN_CODIGO: TStringField
      FieldName = 'TRAN_CODIGO'
      Size = 3
    end
    object cdsNotaCANP_CODIGO: TStringField
      FieldName = 'CANP_CODIGO'
      Size = 3
    end
    object cdsNotaREG_CODIGO: TStringField
      FieldName = 'REG_CODIGO'
      Size = 3
    end
    object cdsNotaTIPP_CODIGO: TStringField
      FieldName = 'TIPP_CODIGO'
      Size = 2
    end
    object cdsNotaSUP_CODIGO: TStringField
      FieldName = 'SUP_CODIGO'
      Size = 3
    end
    object cdsNotaREP_CODIGO: TStringField
      FieldName = 'REP_CODIGO'
      Size = 3
    end
    object cdsNotaPED_DATAPED: TDateTimeField
      FieldName = 'PED_DATAPED'
    end
    object cdsNotaPED_DATACHE: TDateTimeField
      Alignment = taCenter
      FieldName = 'PED_DATACHE'
    end
    object cdsNotaPED_COMISREP: TFloatField
      FieldName = 'PED_COMISREP'
    end
    object cdsNotaPED_COMISSUP: TFloatField
      FieldName = 'PED_COMISSUP'
    end
    object cdsNotaPED_ALIQFINAN: TFloatField
      FieldName = 'PED_ALIQFINAN'
    end
    object cdsNotaPED_ALIQEMB: TFloatField
      FieldName = 'PED_ALIQEMB'
    end
    object cdsNotaPED_ALIQFRETE: TFloatField
      FieldName = 'PED_ALIQFRETE'
    end
    object cdsNotaPED_ALIQSEGURO: TFloatField
      FieldName = 'PED_ALIQSEGURO'
    end
    object cdsNotaPED_TIPOFRETE: TStringField
      FieldName = 'PED_TIPOFRETE'
      Size = 1
    end
    object cdsNotaPED_OBS: TStringField
      FieldName = 'PED_OBS'
      Size = 40
    end
    object cdsNotaPED_DATADIGI: TDateTimeField
      FieldName = 'PED_DATADIGI'
    end
    object cdsNotaPED_PEDCLIE: TStringField
      FieldName = 'PED_PEDCLIE'
      Size = 9
    end
    object cdsNotaPED_PEDREPRE: TStringField
      FieldName = 'PED_PEDREPRE'
      Size = 9
    end
    object cdsNotaPED_VALOR: TFloatField
      FieldName = 'PED_VALOR'
    end
    object cdsNotaPED_TOTALPROD: TFloatField
      FieldName = 'PED_TOTALPROD'
    end
    object cdsNotaPED_QTDEEMB: TFloatField
      FieldName = 'PED_QTDEEMB'
    end
    object cdsNotaPED_PESOLIQ: TFloatField
      FieldName = 'PED_PESOLIQ'
    end
    object cdsNotaPED_PESOBRU: TFloatField
      FieldName = 'PED_PESOBRU'
    end
    object cdsNotaPED_NUMPGTOS: TFloatField
      FieldName = 'PED_NUMPGTOS'
    end
    object cdsNotaPED_PRAZOMEDIO: TFloatField
      FieldName = 'PED_PRAZOMEDIO'
    end
    object cdsNotaPED_LIBERADO: TStringField
      FieldName = 'PED_LIBERADO'
      Size = 1
    end
    object cdsNotaPED_CONFERIDO: TStringField
      FieldName = 'PED_CONFERIDO'
      Size = 1
    end
    object cdsNotaPED_ULTALTERACAO: TDateTimeField
      FieldName = 'PED_ULTALTERACAO'
    end
    object cdsNotaPED_SITUACAO: TStringField
      FieldName = 'PED_SITUACAO'
      Size = 1
    end
    object cdsNotaPED_ALIQDESC: TFloatField
      FieldName = 'PED_ALIQDESC'
    end
    object cdsNotaPED_DESCONTO: TFloatField
      FieldName = 'PED_DESCONTO'
    end
    object cdsNotaBKP_PEDIDO: TStringField
      FieldName = 'BKP_PEDIDO'
      Size = 9
    end
    object cdsNotaPED_DATACANC: TDateTimeField
      FieldName = 'PED_DATACANC'
    end
    object cdsNotaDivisao: TStringField
      FieldName = 'Divisao'
      ReadOnly = True
    end
    object cdsNotaTransportadora: TStringField
      FieldName = 'Transportadora'
      ReadOnly = True
      Size = 40
    end
    object cdsNotaRegra: TStringField
      FieldName = 'Regra'
      ReadOnly = True
      Size = 40
    end
    object cdsNotaRepresentante: TStringField
      FieldName = 'Representante'
      ReadOnly = True
      Size = 40
    end
    object cdsNotaTRAN_NOME: TStringField
      FieldName = 'TRAN_NOME'
      Size = 40
    end
    object cdsNotaNOTV_DATAFAT: TDateTimeField
      FieldName = 'NOTV_DATAFAT'
    end
    object cdsNotaNOTV_VALORCONTABIL: TFloatField
      FieldName = 'NOTV_VALORCONTABIL'
    end
    object cdsNotaNOTV_TOTALPRODUTO: TFloatField
      FieldName = 'NOTV_TOTALPRODUTO'
    end
    object cdsNotaNOTV_DATABASE: TDateTimeField
      FieldName = 'NOTV_DATABASE'
    end
    object cdsNotaTRAN_CODIGO_REDESPACHO: TStringField
      FieldName = 'TRAN_CODIGO_REDESPACHO'
      Size = 3
    end
    object cdsNotaREDESPACHO: TStringField
      FieldName = 'REDESPACHO'
      Size = 40
    end
  end
  object dspPedAss: TDataSetProvider
    DataSet = tqPedAss
    Left = 36
    Top = 157
  end
  object cdsPedAss: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspPedAss'
    Left = 64
    Top = 157
    object cdsPedAssPED_NUMERO: TStringField
      FieldName = 'PED_NUMERO'
      Size = 9
    end
    object cdsPedAssENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Size = 5
    end
    object cdsPedAssCONF_CODIGO: TStringField
      FieldName = 'CONF_CODIGO'
      Size = 2
    end
    object cdsPedAssEMP_CODIGO: TStringField
      FieldName = 'EMP_CODIGO'
      Size = 3
    end
    object cdsPedAssDIV_CODIGO: TStringField
      FieldName = 'DIV_CODIGO'
      Size = 2
    end
    object cdsPedAssCOD_USUA: TStringField
      FieldName = 'COD_USUA'
      Size = 10
    end
    object cdsPedAssMOE_CODIGO: TStringField
      FieldName = 'MOE_CODIGO'
      Size = 2
    end
    object cdsPedAssTRAN_CODIGO: TStringField
      FieldName = 'TRAN_CODIGO'
      Size = 3
    end
    object cdsPedAssCANP_CODIGO: TStringField
      FieldName = 'CANP_CODIGO'
      Size = 3
    end
    object cdsPedAssREG_CODIGO: TStringField
      FieldName = 'REG_CODIGO'
      Size = 3
    end
    object cdsPedAssTIPP_CODIGO: TStringField
      FieldName = 'TIPP_CODIGO'
      Size = 2
    end
    object cdsPedAssSUP_CODIGO: TStringField
      FieldName = 'SUP_CODIGO'
      Size = 3
    end
    object cdsPedAssREP_CODIGO: TStringField
      FieldName = 'REP_CODIGO'
      Size = 3
    end
    object cdsPedAssPED_DATAPED: TDateTimeField
      FieldName = 'PED_DATAPED'
    end
    object cdsPedAssPED_DATACHE: TDateTimeField
      FieldName = 'PED_DATACHE'
    end
    object cdsPedAssPED_COMISREP: TFloatField
      FieldName = 'PED_COMISREP'
    end
    object cdsPedAssPED_COMISSUP: TFloatField
      FieldName = 'PED_COMISSUP'
    end
    object cdsPedAssPED_ALIQFINAN: TFloatField
      FieldName = 'PED_ALIQFINAN'
    end
    object cdsPedAssPED_ALIQEMB: TFloatField
      FieldName = 'PED_ALIQEMB'
    end
    object cdsPedAssPED_ALIQFRETE: TFloatField
      FieldName = 'PED_ALIQFRETE'
    end
    object cdsPedAssPED_ALIQSEGURO: TFloatField
      FieldName = 'PED_ALIQSEGURO'
    end
    object cdsPedAssPED_TIPOFRETE: TStringField
      FieldName = 'PED_TIPOFRETE'
      Size = 1
    end
    object cdsPedAssPED_OBS: TStringField
      FieldName = 'PED_OBS'
      Size = 40
    end
    object cdsPedAssPED_DATADIGI: TDateTimeField
      FieldName = 'PED_DATADIGI'
    end
    object cdsPedAssPED_PEDCLIE: TStringField
      FieldName = 'PED_PEDCLIE'
      Size = 9
    end
    object cdsPedAssPED_PEDREPRE: TStringField
      FieldName = 'PED_PEDREPRE'
      Size = 9
    end
    object cdsPedAssPED_VALOR: TFloatField
      FieldName = 'PED_VALOR'
    end
    object cdsPedAssPED_TOTALPROD: TFloatField
      FieldName = 'PED_TOTALPROD'
    end
    object cdsPedAssPED_QTDEEMB: TFloatField
      FieldName = 'PED_QTDEEMB'
    end
    object cdsPedAssPED_PESOLIQ: TFloatField
      FieldName = 'PED_PESOLIQ'
    end
    object cdsPedAssPED_PESOBRU: TFloatField
      FieldName = 'PED_PESOBRU'
    end
    object cdsPedAssPED_NUMPGTOS: TFloatField
      FieldName = 'PED_NUMPGTOS'
    end
    object cdsPedAssPED_PRAZOMEDIO: TFloatField
      FieldName = 'PED_PRAZOMEDIO'
    end
    object cdsPedAssPED_LIBERADO: TStringField
      FieldName = 'PED_LIBERADO'
      Size = 1
    end
    object cdsPedAssPED_CONFERIDO: TStringField
      FieldName = 'PED_CONFERIDO'
      Size = 1
    end
    object cdsPedAssPED_ULTALTERACAO: TDateTimeField
      FieldName = 'PED_ULTALTERACAO'
    end
    object cdsPedAssPED_SITUACAO: TStringField
      FieldName = 'PED_SITUACAO'
      Size = 1
    end
    object cdsPedAssPED_ALIQDESC: TFloatField
      FieldName = 'PED_ALIQDESC'
    end
    object cdsPedAssPED_DESCONTO: TFloatField
      FieldName = 'PED_DESCONTO'
    end
    object cdsPedAssPED_DATACANC: TDateTimeField
      FieldName = 'PED_DATACANC'
    end
    object cdsPedAssBKP_PEDIDO: TStringField
      FieldName = 'BKP_PEDIDO'
      Size = 9
    end
    object cdsPedAssRepresentante: TStringField
      FieldName = 'Representante'
      ReadOnly = True
      Size = 40
    end
    object cdsPedAssDivisao: TStringField
      FieldName = 'Divisao'
      ReadOnly = True
    end
    object cdsPedAssTransportadora: TStringField
      FieldName = 'Transportadora'
      ReadOnly = True
      Size = 40
    end
    object cdsPedAssRegra: TStringField
      FieldName = 'Regra'
      ReadOnly = True
      Size = 40
    end
  end
  object dspNotaAss: TDataSetProvider
    DataSet = tqNotaAss
    Left = 36
    Top = 213
  end
  object cdsNotaAss: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspNotaAss'
    Left = 64
    Top = 213
    object cdsNotaAssDivisao: TStringField
      FieldName = 'Divisao'
      ReadOnly = True
    end
    object cdsNotaAssTransportadora: TStringField
      FieldName = 'Transportadora'
      ReadOnly = True
      Size = 40
    end
    object cdsNotaAssRegra: TStringField
      FieldName = 'Regra'
      ReadOnly = True
      Size = 40
    end
    object cdsNotaAssRepresentante: TStringField
      FieldName = 'Representante'
      ReadOnly = True
      Size = 40
    end
    object cdsNotaAssPED_NUMERO: TStringField
      FieldName = 'PED_NUMERO'
      Size = 9
    end
    object cdsNotaAssENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Size = 5
    end
    object cdsNotaAssCONF_CODIGO: TStringField
      FieldName = 'CONF_CODIGO'
      Size = 2
    end
    object cdsNotaAssEMP_CODIGO: TStringField
      FieldName = 'EMP_CODIGO'
      Size = 3
    end
    object cdsNotaAssDIV_CODIGO: TStringField
      FieldName = 'DIV_CODIGO'
      Size = 2
    end
    object cdsNotaAssCOD_USUA: TStringField
      FieldName = 'COD_USUA'
      Size = 10
    end
    object cdsNotaAssMOE_CODIGO: TStringField
      FieldName = 'MOE_CODIGO'
      Size = 2
    end
    object cdsNotaAssTRAN_CODIGO: TStringField
      FieldName = 'TRAN_CODIGO'
      Size = 3
    end
    object cdsNotaAssCANP_CODIGO: TStringField
      FieldName = 'CANP_CODIGO'
      Size = 3
    end
    object cdsNotaAssREG_CODIGO: TStringField
      FieldName = 'REG_CODIGO'
      Size = 3
    end
    object cdsNotaAssTIPP_CODIGO: TStringField
      FieldName = 'TIPP_CODIGO'
      Size = 2
    end
    object cdsNotaAssSUP_CODIGO: TStringField
      FieldName = 'SUP_CODIGO'
      Size = 3
    end
    object cdsNotaAssREP_CODIGO: TStringField
      FieldName = 'REP_CODIGO'
      Size = 3
    end
    object cdsNotaAssPED_DATAPED: TDateTimeField
      FieldName = 'PED_DATAPED'
    end
    object cdsNotaAssPED_DATACHE: TDateTimeField
      FieldName = 'PED_DATACHE'
    end
    object cdsNotaAssPED_COMISREP: TFloatField
      FieldName = 'PED_COMISREP'
    end
    object cdsNotaAssPED_COMISSUP: TFloatField
      FieldName = 'PED_COMISSUP'
    end
    object cdsNotaAssPED_ALIQFINAN: TFloatField
      FieldName = 'PED_ALIQFINAN'
    end
    object cdsNotaAssPED_ALIQEMB: TFloatField
      FieldName = 'PED_ALIQEMB'
    end
    object cdsNotaAssPED_ALIQFRETE: TFloatField
      FieldName = 'PED_ALIQFRETE'
    end
    object cdsNotaAssPED_ALIQSEGURO: TFloatField
      FieldName = 'PED_ALIQSEGURO'
    end
    object cdsNotaAssPED_TIPOFRETE: TStringField
      FieldName = 'PED_TIPOFRETE'
      Size = 1
    end
    object cdsNotaAssPED_OBS: TStringField
      FieldName = 'PED_OBS'
      Size = 40
    end
    object cdsNotaAssPED_DATADIGI: TDateTimeField
      FieldName = 'PED_DATADIGI'
    end
    object cdsNotaAssPED_PEDCLIE: TStringField
      FieldName = 'PED_PEDCLIE'
      Size = 9
    end
    object cdsNotaAssPED_PEDREPRE: TStringField
      FieldName = 'PED_PEDREPRE'
      Size = 9
    end
    object cdsNotaAssPED_VALOR: TFloatField
      FieldName = 'PED_VALOR'
    end
    object cdsNotaAssPED_TOTALPROD: TFloatField
      FieldName = 'PED_TOTALPROD'
    end
    object cdsNotaAssPED_QTDEEMB: TFloatField
      FieldName = 'PED_QTDEEMB'
    end
    object cdsNotaAssPED_PESOLIQ: TFloatField
      FieldName = 'PED_PESOLIQ'
    end
    object cdsNotaAssPED_PESOBRU: TFloatField
      FieldName = 'PED_PESOBRU'
    end
    object cdsNotaAssPED_NUMPGTOS: TFloatField
      FieldName = 'PED_NUMPGTOS'
    end
    object cdsNotaAssPED_PRAZOMEDIO: TFloatField
      FieldName = 'PED_PRAZOMEDIO'
    end
    object cdsNotaAssPED_LIBERADO: TStringField
      FieldName = 'PED_LIBERADO'
      Size = 1
    end
    object cdsNotaAssPED_CONFERIDO: TStringField
      FieldName = 'PED_CONFERIDO'
      Size = 1
    end
    object cdsNotaAssPED_ULTALTERACAO: TDateTimeField
      FieldName = 'PED_ULTALTERACAO'
    end
    object cdsNotaAssPED_SITUACAO: TStringField
      FieldName = 'PED_SITUACAO'
      Size = 1
    end
    object cdsNotaAssPED_ALIQDESC: TFloatField
      FieldName = 'PED_ALIQDESC'
    end
    object cdsNotaAssPED_DESCONTO: TFloatField
      FieldName = 'PED_DESCONTO'
    end
    object cdsNotaAssPED_DATACANC: TDateTimeField
      FieldName = 'PED_DATACANC'
    end
    object cdsNotaAssBKP_PEDIDO: TStringField
      FieldName = 'BKP_PEDIDO'
      Size = 9
    end
    object cdsNotaAssTRANS: TStringField
      FieldName = 'TRANS'
      Size = 3
    end
    object cdsNotaAssDTFAT: TDateTimeField
      FieldName = 'DTFAT'
    end
  end
  object dspTit: TDataSetProvider
    DataSet = tqTit
    Left = 36
    Top = 437
  end
  object cdsTit: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspTit'
    Left = 64
    Top = 437
    object cdsTitTIPD_CODIGO: TStringField
      FieldName = 'TIPD_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.TIPD_CODIGO'
      Size = 1
    end
    object cdsTitTITC_NUMERO: TStringField
      FieldName = 'TITC_NUMERO'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_NUMERO'
    end
    object cdsTitENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.ENT_CODIGO'
      Size = 5
    end
    object cdsTitNOTA_NUMERO: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.TITCREDITO.NOTA_NUMERO'
      Size = 9
    end
    object cdsTitLOCAL_CODIGO: TStringField
      FieldName = 'LOCAL_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.LOCAL_CODIGO'
      Size = 3
    end
    object cdsTitSUBL_CODIGO: TStringField
      FieldName = 'SUBL_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.SUBL_CODIGO'
      Size = 3
    end
    object cdsTitEMP_CODIGO: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.EMP_CODIGO'
      Size = 3
    end
    object cdsTitMOE_CODIGO: TStringField
      FieldName = 'MOE_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.MOE_CODIGO'
      Size = 2
    end
    object cdsTitHIST_CODIGO: TStringField
      FieldName = 'HIST_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.HIST_CODIGO'
      Size = 10
    end
    object cdsTitBORD_NUMERO: TStringField
      FieldName = 'BORD_NUMERO'
      Origin = 'INDUSTRIAL.TITCREDITO.BORD_NUMERO'
      Size = 15
    end
    object cdsTitTITC_VALOR: TFloatField
      FieldName = 'TITC_VALOR'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_VALOR'
      currency = True
    end
    object cdsTitTITC_DATAVENC: TDateTimeField
      FieldName = 'TITC_DATAVENC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_DATAVENC'
    end
    object cdsTitTITC_VENCORIG: TDateTimeField
      FieldName = 'TITC_VENCORIG'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_VENCORIG'
    end
    object cdsTitTITC_DATAEMIS: TDateTimeField
      FieldName = 'TITC_DATAEMIS'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_DATAEMIS'
    end
    object cdsTitTITC_TIPOVENC: TFloatField
      FieldName = 'TITC_TIPOVENC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_TIPOVENC'
    end
    object cdsTitTITC_OBS: TStringField
      FieldName = 'TITC_OBS'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_OBS'
      Size = 40
    end
    object cdsTitTITC_OBS2: TStringField
      FieldName = 'TITC_OBS2'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_OBS2'
      Size = 40
    end
    object cdsTitTITC_NUMBLOQ: TStringField
      FieldName = 'TITC_NUMBLOQ'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_NUMBLOQ'
      Size = 15
    end
    object cdsTitTITC_BCCOMIS: TFloatField
      FieldName = 'TITC_BCCOMIS'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_BCCOMIS'
    end
    object cdsTitTITC_DATADESC: TDateTimeField
      FieldName = 'TITC_DATADESC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_DATADESC'
    end
    object cdsTitTITC_VLDESC: TFloatField
      FieldName = 'TITC_VLDESC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_VLDESC'
      currency = True
    end
    object cdsTitTITC_OBS0: TMemoField
      FieldName = 'TITC_OBS0'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_OBS0'
      BlobType = ftMemo
      Size = 2000
    end
    object cdsTitTITC_SALDO: TFloatField
      FieldName = 'TITC_SALDO'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_SALDO'
      currency = True
    end
    object cdsTitTITC_DATAPGTO: TDateTimeField
      FieldName = 'TITC_DATAPGTO'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_DATAPGTO'
    end
    object cdsTitTITC_DC: TFloatField
      FieldName = 'TITC_DC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_DC'
    end
    object cdsTitTITC_PAGREC: TStringField
      FieldName = 'TITC_PAGREC'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_PAGREC'
      Size = 1
    end
    object cdsTitREP_CODIGO: TStringField
      FieldName = 'REP_CODIGO'
      Origin = 'INDUSTRIAL.TITCREDITO.REP_CODIGO'
      Size = 3
    end
    object cdsTitNOTAC_NUMERO: TStringField
      FieldName = 'NOTAC_NUMERO'
      Origin = 'INDUSTRIAL.TITCREDITO.NOTAC_NUMERO'
      Size = 9
    end
    object cdsTitNOTA_SERIE: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.TITCREDITO.NOTA_SERIE'
      Size = 3
    end
    object cdsTitNOTC_SERIE: TStringField
      FieldName = 'NOTC_SERIE'
      Origin = 'INDUSTRIAL.TITCREDITO.NOTC_SERIE'
      Size = 3
    end
    object cdsTitTITC_CONTAB: TStringField
      FieldName = 'TITC_CONTAB'
      Origin = 'INDUSTRIAL.TITCREDITO.TITC_CONTAB'
      Size = 1
    end
    object cdsTitBKP_NUMERO: TStringField
      FieldName = 'BKP_NUMERO'
      Origin = 'INDUSTRIAL.BACKUP_VENDA.BKP_NUMERO'
      Size = 9
    end
    object cdsTitBKP_SERIE: TStringField
      FieldName = 'BKP_SERIE'
      Origin = 'INDUSTRIAL.BACKUP_VENDA.BKP_SERIE'
      Size = 3
    end
    object cdsTitPZDIAS: TFloatField
      FieldName = 'PZDIAS'
      OnGetText = cdsTitPZDIASGetText
    end
    object cdsTitPZDIAS1: TFloatField
      FieldName = 'PZDIAS1'
    end
    object cdsTitTITC_NOSSONUM: TStringField
      FieldName = 'TITC_NOSSONUM'
    end
  end
  object cdsNF: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspNF'
    Left = 712
    Top = 157
    object cdsNFBKP_NUMERO: TStringField
      FieldName = 'BKP_NUMERO'
      Size = 9
    end
    object cdsNFNOTA_SERIE: TStringField
      FieldName = 'NOTA_SERIE'
      Size = 3
    end
    object cdsNFNOTA_NUMERO: TStringField
      FieldName = 'NOTA_NUMERO'
      Size = 9
    end
    object cdsNFENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Size = 5
    end
    object cdsNFEMP_CODIGO: TStringField
      FieldName = 'EMP_CODIGO'
      Size = 3
    end
    object cdsNFTRAN_CODIGO: TStringField
      FieldName = 'TRAN_CODIGO'
      Size = 3
    end
    object cdsNFTRAN_CODIGO_REDESPACHO: TStringField
      FieldName = 'TRAN_CODIGO_REDESPACHO'
      Size = 3
    end
    object cdsNFHIST_CODIGO: TStringField
      FieldName = 'HIST_CODIGO'
      Size = 10
    end
    object cdsNFMOE_CODIGO: TStringField
      FieldName = 'MOE_CODIGO'
      Size = 2
    end
    object cdsNFSUP_CODIGO: TStringField
      FieldName = 'SUP_CODIGO'
      Size = 3
    end
    object cdsNFREP_CODIGO: TStringField
      FieldName = 'REP_CODIGO'
      Size = 3
    end
    object cdsNFDIV_CODIGO: TStringField
      FieldName = 'DIV_CODIGO'
      Size = 2
    end
    object cdsNFCONF_CODIGO: TStringField
      FieldName = 'CONF_CODIGO'
      Size = 2
    end
    object cdsNFCODF_CODIGO: TStringField
      FieldName = 'CODF_CODIGO'
      Size = 5
    end
    object cdsNFNATO_CODIGO: TStringField
      FieldName = 'NATO_CODIGO'
      Size = 2
    end
    object cdsNFREG_CODIGO: TStringField
      FieldName = 'REG_CODIGO'
      Size = 3
    end
    object cdsNFNOTV_COMISREP: TFloatField
      FieldName = 'NOTV_COMISREP'
    end
    object cdsNFNOTV_COMISSUP: TFloatField
      FieldName = 'NOTV_COMISSUP'
    end
    object cdsNFNOTV_OBSERVACAO: TStringField
      FieldName = 'NOTV_OBSERVACAO'
      Size = 40
    end
    object cdsNFNOTV_ALIQIPI: TFloatField
      FieldName = 'NOTV_ALIQIPI'
    end
    object cdsNFNOTV_ALIQICMS: TFloatField
      FieldName = 'NOTV_ALIQICMS'
    end
    object cdsNFNOTV_ALIQICMSUBS: TFloatField
      FieldName = 'NOTV_ALIQICMSUBS'
    end
    object cdsNFNOTV_ALIQDESCICM: TFloatField
      FieldName = 'NOTV_ALIQDESCICM'
    end
    object cdsNFNOTV_ALIQEMB: TFloatField
      FieldName = 'NOTV_ALIQEMB'
    end
    object cdsNFNOTV_ALIQENC: TFloatField
      FieldName = 'NOTV_ALIQENC'
    end
    object cdsNFNOTV_ALIQSEGURO: TFloatField
      FieldName = 'NOTV_ALIQSEGURO'
    end
    object cdsNFNOTV_ALIQDESCONTO: TFloatField
      FieldName = 'NOTV_ALIQDESCONTO'
    end
    object cdsNFNOTV_FRETE: TFloatField
      FieldName = 'NOTV_FRETE'
    end
    object cdsNFNOTV_ALIQFRETE: TFloatField
      FieldName = 'NOTV_ALIQFRETE'
    end
    object cdsNFNOTV_TOTALPRODUTO: TFloatField
      FieldName = 'NOTV_TOTALPRODUTO'
    end
    object cdsNFNOTV_TOTALDESCONTO: TFloatField
      FieldName = 'NOTV_TOTALDESCONTO'
    end
    object cdsNFNOTV_EMBALAGEM: TFloatField
      FieldName = 'NOTV_EMBALAGEM'
    end
    object cdsNFNOTV_ENCARGOS: TFloatField
      FieldName = 'NOTV_ENCARGOS'
    end
    object cdsNFNOTV_BCALIPI: TFloatField
      FieldName = 'NOTV_BCALIPI'
    end
    object cdsNFNOTV_BCALICMS: TFloatField
      FieldName = 'NOTV_BCALICMS'
    end
    object cdsNFNOTV_BCALICMSUBS: TFloatField
      FieldName = 'NOTV_BCALICMSUBS'
    end
    object cdsNFNOTV_BCALDESCICM: TFloatField
      FieldName = 'NOTV_BCALDESCICM'
    end
    object cdsNFNOTV_SEGURO: TFloatField
      FieldName = 'NOTV_SEGURO'
    end
    object cdsNFNOTV_IPI: TFloatField
      FieldName = 'NOTV_IPI'
    end
    object cdsNFNOTV_ICMS: TFloatField
      FieldName = 'NOTV_ICMS'
    end
    object cdsNFNOTV_ICMSUBS: TFloatField
      FieldName = 'NOTV_ICMSUBS'
    end
    object cdsNFNOTV_DESCICM: TFloatField
      FieldName = 'NOTV_DESCICM'
    end
    object cdsNFNOTV_ISENTAIPI: TFloatField
      FieldName = 'NOTV_ISENTAIPI'
    end
    object cdsNFNOTV_ISENTAICMS: TFloatField
      FieldName = 'NOTV_ISENTAICMS'
    end
    object cdsNFNOTV_OUTRASIPI: TFloatField
      FieldName = 'NOTV_OUTRASIPI'
    end
    object cdsNFNOTV_OUTRASICMS: TFloatField
      FieldName = 'NOTV_OUTRASICMS'
    end
    object cdsNFNOTV_VALORCONTABIL: TFloatField
      FieldName = 'NOTV_VALORCONTABIL'
    end
    object cdsNFNTOV_BCALCOMISSAOREP: TFloatField
      FieldName = 'NTOV_BCALCOMISSAOREP'
    end
    object cdsNFNOTV_QTDEEMB: TFloatField
      FieldName = 'NOTV_QTDEEMB'
    end
    object cdsNFNOTV_PESOLIQ: TFloatField
      FieldName = 'NOTV_PESOLIQ'
    end
    object cdsNFNOTV_PESOBRU: TFloatField
      FieldName = 'NOTV_PESOBRU'
    end
    object cdsNFNOTV_SITUACAOTRIB: TStringField
      FieldName = 'NOTV_SITUACAOTRIB'
      Size = 3
    end
    object cdsNFNOTV_CONTADEBITO: TStringField
      FieldName = 'NOTV_CONTADEBITO'
      Size = 10
    end
    object cdsNFNOTV_CONTACREDITO: TStringField
      FieldName = 'NOTV_CONTACREDITO'
      Size = 10
    end
    object cdsNFNOTV_PRAZOMEDIO: TFloatField
      FieldName = 'NOTV_PRAZOMEDIO'
    end
    object cdsNFNOTV_NUMPGTOS: TFloatField
      FieldName = 'NOTV_NUMPGTOS'
    end
    object cdsNFNOTV_QTDEITENS: TFloatField
      FieldName = 'NOTV_QTDEITENS'
    end
    object cdsNFNOTV_ESPEMBALAGEM: TStringField
      FieldName = 'NOTV_ESPEMBALAGEM'
      Size = 10
    end
    object cdsNFNOTV_MOTORISTA: TStringField
      FieldName = 'NOTV_MOTORISTA'
      Size = 30
    end
    object cdsNFNOTV_VIATRANSPORTE: TStringField
      FieldName = 'NOTV_VIATRANSPORTE'
      Size = 10
    end
    object cdsNFNOTV_MARCAEMP: TStringField
      FieldName = 'NOTV_MARCAEMP'
      Size = 14
    end
    object cdsNFNOTV_PLACAVEIC: TStringField
      FieldName = 'NOTV_PLACAVEIC'
      Size = 8
    end
    object cdsNFNOTV_DATAFAT: TDateTimeField
      FieldName = 'NOTV_DATAFAT'
    end
    object cdsNFNOTV_DATAENTRADA: TDateTimeField
      FieldName = 'NOTV_DATAENTRADA'
    end
    object cdsNFNOTV_DATASAIDA: TDateTimeField
      FieldName = 'NOTV_DATASAIDA'
    end
    object cdsNFNOTV_HORASAIDA: TStringField
      FieldName = 'NOTV_HORASAIDA'
      Size = 8
    end
    object cdsNFCANP_CODIGO: TStringField
      FieldName = 'CANP_CODIGO'
      Size = 3
    end
    object cdsNFIMP_NOTAFISCAL: TStringField
      FieldName = 'IMP_NOTAFISCAL'
      Size = 1
    end
    object cdsNFNOTV_EMITENTE: TStringField
      FieldName = 'NOTV_EMITENTE'
      Size = 1
    end
    object cdsNFCODF_CODIGO1: TStringField
      FieldName = 'CODF_CODIGO1'
      Size = 5
    end
    object cdsNFNOTV_FRETEAUT: TFloatField
      FieldName = 'NOTV_FRETEAUT'
    end
    object cdsNFNOTV_ALIQICMSAUT: TFloatField
      FieldName = 'NOTV_ALIQICMSAUT'
    end
    object cdsNFREG_NUMERO: TStringField
      FieldName = 'REG_NUMERO'
      Size = 12
    end
    object cdsNFNOTV_TIPOFRETE: TStringField
      FieldName = 'NOTV_TIPOFRETE'
      Size = 1
    end
    object cdsNFTRAN_NOME: TStringField
      FieldName = 'TRAN_NOME'
      Size = 40
    end
    object cdsNFRepresentante: TStringField
      FieldName = 'Representante'
      ReadOnly = True
      Size = 40
    end
    object cdsNFDivisao: TStringField
      FieldName = 'Divisao'
      ReadOnly = True
    end
  end
  object dspNF: TDataSetProvider
    DataSet = tqNF
    Left = 684
    Top = 157
  end
  object dtTitNota: TDataSource
    DataSet = tqTitNota
    Left = 36
    Top = 409
  end
  object tqPedParc: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      
        'Select p.*, bkp_pedido from PedidosVenda P, Backup_Pedido B, par' +
        'ametros t'
      
        'where (p.Ped_Numero = b.Ped_Numero and p.Ent_codigo = b.Ent_Codi' +
        'go)'
      'and p.TIPP_CODIGO = t.tipp_asstec and Ped_Situacao = '#39'P'#39)
    Left = 265
    Top = 157
    object StringField13: TStringField
      FieldName = 'PED_NUMERO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_NUMERO'
      Size = 9
    end
    object StringField14: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.ENT_CODIGO'
      Size = 5
    end
    object StringField15: TStringField
      FieldName = 'CONF_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.CONF_CODIGO'
      Size = 2
    end
    object StringField16: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.EMP_CODIGO'
      Size = 3
    end
    object StringField17: TStringField
      FieldName = 'DIV_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.DIV_CODIGO'
      Size = 2
    end
    object StringField18: TStringField
      FieldName = 'COD_USUA'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.COD_USUA'
      Size = 10
    end
    object StringField19: TStringField
      FieldName = 'MOE_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.MOE_CODIGO'
      Size = 2
    end
    object StringField20: TStringField
      FieldName = 'TRAN_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.TRAN_CODIGO'
      Size = 3
    end
    object StringField21: TStringField
      FieldName = 'CANP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.CANP_CODIGO'
      Size = 3
    end
    object StringField22: TStringField
      FieldName = 'REG_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.REG_CODIGO'
      Size = 3
    end
    object StringField23: TStringField
      FieldName = 'TIPP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.TIPP_CODIGO'
      Size = 2
    end
    object StringField24: TStringField
      FieldName = 'SUP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.SUP_CODIGO'
      Size = 3
    end
    object StringField25: TStringField
      FieldName = 'REP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.REP_CODIGO'
      Size = 3
    end
    object DateTimeField2: TDateTimeField
      FieldName = 'PED_DATAPED'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATAPED'
    end
    object DateTimeField3: TDateTimeField
      FieldName = 'PED_DATACHE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATACHE'
    end
    object FloatField13: TFloatField
      FieldName = 'PED_COMISREP'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_COMISREP'
    end
    object FloatField14: TFloatField
      FieldName = 'PED_COMISSUP'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_COMISSUP'
    end
    object FloatField15: TFloatField
      FieldName = 'PED_ALIQFINAN'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQFINAN'
    end
    object FloatField16: TFloatField
      FieldName = 'PED_ALIQEMB'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQEMB'
    end
    object FloatField17: TFloatField
      FieldName = 'PED_ALIQFRETE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQFRETE'
    end
    object FloatField18: TFloatField
      FieldName = 'PED_ALIQSEGURO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQSEGURO'
    end
    object StringField26: TStringField
      FieldName = 'PED_TIPOFRETE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_TIPOFRETE'
      Size = 1
    end
    object StringField27: TStringField
      FieldName = 'PED_OBS'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_OBS'
      Size = 40
    end
    object DateTimeField4: TDateTimeField
      FieldName = 'PED_DATADIGI'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATADIGI'
    end
    object StringField28: TStringField
      FieldName = 'PED_PEDCLIE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PEDCLIE'
      Size = 9
    end
    object StringField29: TStringField
      FieldName = 'PED_PEDREPRE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PEDREPRE'
      Size = 9
    end
    object FloatField19: TFloatField
      FieldName = 'PED_VALOR'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_VALOR'
    end
    object FloatField20: TFloatField
      FieldName = 'PED_TOTALPROD'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_TOTALPROD'
    end
    object FloatField21: TFloatField
      FieldName = 'PED_QTDEEMB'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_QTDEEMB'
    end
    object FloatField22: TFloatField
      FieldName = 'PED_PESOLIQ'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PESOLIQ'
    end
    object FloatField23: TFloatField
      FieldName = 'PED_PESOBRU'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PESOBRU'
    end
    object FloatField24: TFloatField
      FieldName = 'PED_NUMPGTOS'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_NUMPGTOS'
    end
    object FloatField25: TFloatField
      FieldName = 'PED_PRAZOMEDIO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PRAZOMEDIO'
    end
    object StringField30: TStringField
      FieldName = 'PED_LIBERADO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_LIBERADO'
      Size = 1
    end
    object StringField31: TStringField
      FieldName = 'PED_CONFERIDO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_CONFERIDO'
      Size = 1
    end
    object DateTimeField5: TDateTimeField
      FieldName = 'PED_ULTALTERACAO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ULTALTERACAO'
    end
    object StringField32: TStringField
      FieldName = 'PED_SITUACAO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_SITUACAO'
      Size = 1
    end
    object FloatField26: TFloatField
      FieldName = 'PED_ALIQDESC'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQDESC'
    end
    object FloatField27: TFloatField
      FieldName = 'PED_DESCONTO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DESCONTO'
    end
    object DateTimeField6: TDateTimeField
      FieldName = 'PED_DATACANC'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATACANC'
    end
    object StringField58: TStringField
      FieldName = 'BKP_PEDIDO'
      Origin = 'INDUSTRIAL.BACKUP_PEDIDO.BKP_PEDIDO'
      Size = 9
    end
    object StringField75: TStringField
      FieldKind = fkLookup
      FieldName = 'Representante'
      LookupDataSet = tqRepr
      LookupKeyFields = 'REP_CODIGO'
      LookupResultField = 'REP_NOME'
      KeyFields = 'REP_CODIGO'
      Size = 40
      Lookup = True
    end
    object StringField76: TStringField
      FieldKind = fkLookup
      FieldName = 'Divisao'
      LookupDataSet = tqDivisao
      LookupKeyFields = 'DIV_CODIGO'
      LookupResultField = 'DIV_DESCRICAO'
      KeyFields = 'DIV_CODIGO'
      Lookup = True
    end
    object StringField77: TStringField
      FieldKind = fkLookup
      FieldName = 'Transportadora'
      LookupDataSet = tqTrans
      LookupKeyFields = 'TRAN_CODIGO'
      LookupResultField = 'TRAN_NOME'
      KeyFields = 'TRAN_CODIGO'
      Size = 40
      Lookup = True
    end
    object StringField78: TStringField
      FieldKind = fkLookup
      FieldName = 'Regra'
      LookupDataSet = tqRegiao
      LookupKeyFields = 'REG_CODIGO'
      LookupResultField = 'REG_DESCRICAO'
      KeyFields = 'REG_CODIGO'
      Size = 40
      Lookup = True
    end
  end
  object dspPedParc: TDataSetProvider
    DataSet = tqPedParc
    Left = 293
    Top = 157
  end
  object cdsPedParc: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspPedParc'
    Left = 321
    Top = 157
    object StringField79: TStringField
      FieldName = 'PED_NUMERO'
      Size = 9
    end
    object StringField80: TStringField
      FieldName = 'ENT_CODIGO'
      Size = 5
    end
    object StringField81: TStringField
      FieldName = 'CONF_CODIGO'
      Size = 2
    end
    object StringField82: TStringField
      FieldName = 'EMP_CODIGO'
      Size = 3
    end
    object StringField83: TStringField
      FieldName = 'DIV_CODIGO'
      Size = 2
    end
    object StringField84: TStringField
      FieldName = 'COD_USUA'
      Size = 10
    end
    object StringField85: TStringField
      FieldName = 'MOE_CODIGO'
      Size = 2
    end
    object StringField86: TStringField
      FieldName = 'TRAN_CODIGO'
      Size = 3
    end
    object StringField87: TStringField
      FieldName = 'CANP_CODIGO'
      Size = 3
    end
    object StringField88: TStringField
      FieldName = 'REG_CODIGO'
      Size = 3
    end
    object StringField89: TStringField
      FieldName = 'TIPP_CODIGO'
      Size = 2
    end
    object StringField90: TStringField
      FieldName = 'SUP_CODIGO'
      Size = 3
    end
    object StringField91: TStringField
      FieldName = 'REP_CODIGO'
      Size = 3
    end
    object DateTimeField13: TDateTimeField
      FieldName = 'PED_DATAPED'
    end
    object DateTimeField14: TDateTimeField
      FieldName = 'PED_DATACHE'
    end
    object FloatField55: TFloatField
      FieldName = 'PED_COMISREP'
    end
    object FloatField56: TFloatField
      FieldName = 'PED_COMISSUP'
    end
    object FloatField57: TFloatField
      FieldName = 'PED_ALIQFINAN'
    end
    object FloatField58: TFloatField
      FieldName = 'PED_ALIQEMB'
    end
    object FloatField59: TFloatField
      FieldName = 'PED_ALIQFRETE'
    end
    object FloatField60: TFloatField
      FieldName = 'PED_ALIQSEGURO'
    end
    object StringField92: TStringField
      FieldName = 'PED_TIPOFRETE'
      Size = 1
    end
    object StringField93: TStringField
      FieldName = 'PED_OBS'
      Size = 40
    end
    object DateTimeField15: TDateTimeField
      FieldName = 'PED_DATADIGI'
    end
    object StringField94: TStringField
      FieldName = 'PED_PEDCLIE'
      Size = 9
    end
    object StringField95: TStringField
      FieldName = 'PED_PEDREPRE'
      Size = 9
    end
    object FloatField61: TFloatField
      FieldName = 'PED_VALOR'
    end
    object FloatField62: TFloatField
      FieldName = 'PED_TOTALPROD'
    end
    object FloatField63: TFloatField
      FieldName = 'PED_QTDEEMB'
    end
    object FloatField64: TFloatField
      FieldName = 'PED_PESOLIQ'
    end
    object FloatField65: TFloatField
      FieldName = 'PED_PESOBRU'
    end
    object FloatField66: TFloatField
      FieldName = 'PED_NUMPGTOS'
    end
    object FloatField67: TFloatField
      FieldName = 'PED_PRAZOMEDIO'
    end
    object StringField96: TStringField
      FieldName = 'PED_LIBERADO'
      Size = 1
    end
    object StringField97: TStringField
      FieldName = 'PED_CONFERIDO'
      Size = 1
    end
    object DateTimeField16: TDateTimeField
      FieldName = 'PED_ULTALTERACAO'
    end
    object StringField98: TStringField
      FieldName = 'PED_SITUACAO'
      Size = 1
    end
    object FloatField68: TFloatField
      FieldName = 'PED_ALIQDESC'
    end
    object FloatField69: TFloatField
      FieldName = 'PED_DESCONTO'
    end
    object DateTimeField17: TDateTimeField
      FieldName = 'PED_DATACANC'
    end
    object StringField99: TStringField
      FieldName = 'BKP_PEDIDO'
      Size = 9
    end
    object StringField100: TStringField
      FieldName = 'Representante'
      ReadOnly = True
      Size = 40
    end
    object StringField101: TStringField
      FieldName = 'Divisao'
      ReadOnly = True
    end
    object StringField102: TStringField
      FieldName = 'Transportadora'
      ReadOnly = True
      Size = 40
    end
    object StringField103: TStringField
      FieldName = 'Regra'
      ReadOnly = True
      Size = 40
    end
  end
  object dtsPedParc: TDataSource
    DataSet = cdsPedParc
    Left = 349
    Top = 157
  end
  object tqItemPedParc: TQuery
    DatabaseName = 'industrial'
    DataSource = dtsPedParc
    SQL.Strings = (
      'Select * from itemPedVenda'
      'where Ped_Numero = :Ped_Numero')
    Left = 265
    Top = 185
    ParamData = <
      item
        DataType = ftString
        Name = 'PED_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end>
    object StringField104: TStringField
      FieldName = 'PED_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PED_NUMERO'
      Size = 9
    end
    object StringField105: TStringField
      FieldName = 'PED_ITEM'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PED_ITEM'
      Size = 2
    end
    object StringField106: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.NOTA_SERIE'
      Size = 3
    end
    object StringField107: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.NOTA_NUMERO'
      Size = 9
    end
    object StringField108: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ENT_CODIGO'
      Size = 5
    end
    object StringField109: TStringField
      FieldName = 'ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITNV_ITEM'
      Size = 2
    end
    object StringField110: TStringField
      FieldName = 'PRO_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PRO_CODIGO'
      Size = 15
    end
    object StringField111: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.EMP_CODIGO'
      Size = 3
    end
    object StringField112: TStringField
      FieldName = 'ORD_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ORD_NUMERO'
      Size = 6
    end
    object FloatField70: TFloatField
      FieldName = 'ITPV_QUANTIDADE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_QUANTIDADE'
    end
    object FloatField71: TFloatField
      FieldName = 'ITPV_VALORUNIT'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_VALORUNIT'
    end
    object FloatField72: TFloatField
      FieldName = 'ITPV_ALIQDESC'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQDESC'
    end
    object FloatField73: TFloatField
      FieldName = 'ITPV_ALIQIPI'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQIPI'
    end
    object FloatField74: TFloatField
      FieldName = 'ITPV_COMISREP'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_COMISREP'
    end
    object FloatField75: TFloatField
      FieldName = 'ITPV_PRECOGERADO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PRECOGERADO'
    end
    object FloatField76: TFloatField
      FieldName = 'ITPV_PENDENTE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PENDENTE'
    end
    object DateTimeField18: TDateTimeField
      FieldName = 'ITPV_PREVISAO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PREVISAO'
    end
    object FloatField77: TFloatField
      FieldName = 'ITPV_DESC2'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC2'
    end
    object FloatField78: TFloatField
      FieldName = 'ITPV_DESC3'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC3'
    end
    object FloatField79: TFloatField
      FieldName = 'ITPV_DESC4'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC4'
    end
    object FloatField80: TFloatField
      FieldName = 'ITPV_DESC5'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC5'
    end
    object FloatField81: TFloatField
      FieldName = 'ITPV_ALIQICMS'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQICMS'
    end
    object StringField113: TStringField
      FieldName = 'ICMS_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ICMS_CODIGO'
      Size = 2
    end
    object StringField114: TStringField
      FieldName = 'ITPV_CODTRIBUTARIO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_CODTRIBUTARIO'
      Size = 3
    end
    object StringField115: TStringField
      FieldKind = fkLookup
      FieldName = 'Produto'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_NOME'
      KeyFields = 'PRO_CODIGO'
      Size = 40
      Lookup = True
    end
    object StringField116: TStringField
      FieldKind = fkLookup
      FieldName = 'CF'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'NBM_CODIGO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object StringField117: TStringField
      FieldKind = fkLookup
      FieldName = 'CST'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_CODTRIBUTARIO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object StringField118: TStringField
      FieldKind = fkLookup
      FieldName = 'UND'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_UNIDADE'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
  end
  object dtsItemPedParc: TDataSource
    DataSet = tqItemPedParc
    Left = 293
    Top = 185
  end
  object tqPedCanc: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      
        'Select p.*, bkp_pedido from PedidosVenda P, Backup_Pedido B, par' +
        'ametros t'
      
        'where (p.Ped_Numero = b.Ped_Numero and p.Ent_codigo = b.Ent_Codi' +
        'go)'
      'and p.TIPP_CODIGO = t.tipp_asstec and Ped_Situacao = '#39'P'#39)
    Left = 265
    Top = 241
    object StringField119: TStringField
      FieldName = 'PED_NUMERO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_NUMERO'
      Size = 9
    end
    object StringField120: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.ENT_CODIGO'
      Size = 5
    end
    object StringField121: TStringField
      FieldName = 'CONF_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.CONF_CODIGO'
      Size = 2
    end
    object StringField122: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.EMP_CODIGO'
      Size = 3
    end
    object StringField123: TStringField
      FieldName = 'DIV_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.DIV_CODIGO'
      Size = 2
    end
    object StringField124: TStringField
      FieldName = 'COD_USUA'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.COD_USUA'
      Size = 10
    end
    object StringField125: TStringField
      FieldName = 'MOE_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.MOE_CODIGO'
      Size = 2
    end
    object StringField126: TStringField
      FieldName = 'TRAN_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.TRAN_CODIGO'
      Size = 3
    end
    object StringField127: TStringField
      FieldName = 'CANP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.CANP_CODIGO'
      Size = 3
    end
    object StringField128: TStringField
      FieldName = 'REG_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.REG_CODIGO'
      Size = 3
    end
    object StringField129: TStringField
      FieldName = 'TIPP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.TIPP_CODIGO'
      Size = 2
    end
    object StringField130: TStringField
      FieldName = 'SUP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.SUP_CODIGO'
      Size = 3
    end
    object StringField131: TStringField
      FieldName = 'REP_CODIGO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.REP_CODIGO'
      Size = 3
    end
    object DateTimeField19: TDateTimeField
      FieldName = 'PED_DATAPED'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATAPED'
    end
    object DateTimeField20: TDateTimeField
      FieldName = 'PED_DATACHE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATACHE'
    end
    object FloatField82: TFloatField
      FieldName = 'PED_COMISREP'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_COMISREP'
    end
    object FloatField83: TFloatField
      FieldName = 'PED_COMISSUP'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_COMISSUP'
    end
    object FloatField84: TFloatField
      FieldName = 'PED_ALIQFINAN'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQFINAN'
    end
    object FloatField85: TFloatField
      FieldName = 'PED_ALIQEMB'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQEMB'
    end
    object FloatField86: TFloatField
      FieldName = 'PED_ALIQFRETE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQFRETE'
    end
    object FloatField87: TFloatField
      FieldName = 'PED_ALIQSEGURO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQSEGURO'
    end
    object StringField132: TStringField
      FieldName = 'PED_TIPOFRETE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_TIPOFRETE'
      Size = 1
    end
    object StringField133: TStringField
      FieldName = 'PED_OBS'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_OBS'
      Size = 40
    end
    object DateTimeField21: TDateTimeField
      FieldName = 'PED_DATADIGI'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATADIGI'
    end
    object StringField134: TStringField
      FieldName = 'PED_PEDCLIE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PEDCLIE'
      Size = 9
    end
    object StringField135: TStringField
      FieldName = 'PED_PEDREPRE'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PEDREPRE'
      Size = 9
    end
    object FloatField88: TFloatField
      FieldName = 'PED_VALOR'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_VALOR'
    end
    object FloatField89: TFloatField
      FieldName = 'PED_TOTALPROD'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_TOTALPROD'
    end
    object FloatField90: TFloatField
      FieldName = 'PED_QTDEEMB'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_QTDEEMB'
    end
    object FloatField91: TFloatField
      FieldName = 'PED_PESOLIQ'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PESOLIQ'
    end
    object FloatField92: TFloatField
      FieldName = 'PED_PESOBRU'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PESOBRU'
    end
    object FloatField93: TFloatField
      FieldName = 'PED_NUMPGTOS'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_NUMPGTOS'
    end
    object FloatField94: TFloatField
      FieldName = 'PED_PRAZOMEDIO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_PRAZOMEDIO'
    end
    object StringField136: TStringField
      FieldName = 'PED_LIBERADO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_LIBERADO'
      Size = 1
    end
    object StringField137: TStringField
      FieldName = 'PED_CONFERIDO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_CONFERIDO'
      Size = 1
    end
    object DateTimeField22: TDateTimeField
      FieldName = 'PED_ULTALTERACAO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ULTALTERACAO'
    end
    object StringField138: TStringField
      FieldName = 'PED_SITUACAO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_SITUACAO'
      Size = 1
    end
    object FloatField95: TFloatField
      FieldName = 'PED_ALIQDESC'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_ALIQDESC'
    end
    object FloatField96: TFloatField
      FieldName = 'PED_DESCONTO'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DESCONTO'
    end
    object DateTimeField23: TDateTimeField
      FieldName = 'PED_DATACANC'
      Origin = 'INDUSTRIAL.PEDIDOSVENDA.PED_DATACANC'
    end
    object StringField139: TStringField
      FieldName = 'BKP_PEDIDO'
      Origin = 'INDUSTRIAL.BACKUP_PEDIDO.BKP_PEDIDO'
      Size = 9
    end
    object StringField140: TStringField
      FieldKind = fkLookup
      FieldName = 'Representante'
      LookupDataSet = tqRepr
      LookupKeyFields = 'REP_CODIGO'
      LookupResultField = 'REP_NOME'
      KeyFields = 'REP_CODIGO'
      Size = 40
      Lookup = True
    end
    object StringField141: TStringField
      FieldKind = fkLookup
      FieldName = 'Divisao'
      LookupDataSet = tqDivisao
      LookupKeyFields = 'DIV_CODIGO'
      LookupResultField = 'DIV_DESCRICAO'
      KeyFields = 'DIV_CODIGO'
      Lookup = True
    end
    object StringField142: TStringField
      FieldKind = fkLookup
      FieldName = 'Transportadora'
      LookupDataSet = tqTrans
      LookupKeyFields = 'TRAN_CODIGO'
      LookupResultField = 'TRAN_NOME'
      KeyFields = 'TRAN_CODIGO'
      Size = 40
      Lookup = True
    end
    object StringField143: TStringField
      FieldKind = fkLookup
      FieldName = 'Regra'
      LookupDataSet = tqRegiao
      LookupKeyFields = 'REG_CODIGO'
      LookupResultField = 'REG_DESCRICAO'
      KeyFields = 'REG_CODIGO'
      Size = 40
      Lookup = True
    end
    object tqPedCancMotivo: TStringField
      FieldKind = fkLookup
      FieldName = 'Motivo'
      LookupDataSet = tqMotCanc
      LookupKeyFields = 'CANP_CODIGO'
      LookupResultField = 'CANP_DESCRICAO'
      KeyFields = 'CANP_CODIGO'
      Size = 40
      Lookup = True
    end
  end
  object dspPedCanc: TDataSetProvider
    DataSet = tqPedCanc
    Left = 265
    Top = 213
  end
  object cdsPedCanc: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspPedCanc'
    Left = 293
    Top = 213
    object StringField144: TStringField
      FieldName = 'PED_NUMERO'
      Size = 9
    end
    object StringField145: TStringField
      FieldName = 'ENT_CODIGO'
      Size = 5
    end
    object StringField146: TStringField
      FieldName = 'CONF_CODIGO'
      Size = 2
    end
    object StringField147: TStringField
      FieldName = 'EMP_CODIGO'
      Size = 3
    end
    object StringField148: TStringField
      FieldName = 'DIV_CODIGO'
      Size = 2
    end
    object StringField149: TStringField
      FieldName = 'COD_USUA'
      Size = 10
    end
    object StringField150: TStringField
      FieldName = 'MOE_CODIGO'
      Size = 2
    end
    object StringField151: TStringField
      FieldName = 'TRAN_CODIGO'
      Size = 3
    end
    object StringField152: TStringField
      FieldName = 'CANP_CODIGO'
      Size = 3
    end
    object StringField153: TStringField
      FieldName = 'REG_CODIGO'
      Size = 3
    end
    object StringField154: TStringField
      FieldName = 'TIPP_CODIGO'
      Size = 2
    end
    object StringField155: TStringField
      FieldName = 'SUP_CODIGO'
      Size = 3
    end
    object StringField156: TStringField
      FieldName = 'REP_CODIGO'
      Size = 3
    end
    object DateTimeField24: TDateTimeField
      FieldName = 'PED_DATAPED'
    end
    object DateTimeField25: TDateTimeField
      FieldName = 'PED_DATACHE'
    end
    object FloatField97: TFloatField
      FieldName = 'PED_COMISREP'
    end
    object FloatField98: TFloatField
      FieldName = 'PED_COMISSUP'
    end
    object FloatField99: TFloatField
      FieldName = 'PED_ALIQFINAN'
    end
    object FloatField100: TFloatField
      FieldName = 'PED_ALIQEMB'
    end
    object FloatField101: TFloatField
      FieldName = 'PED_ALIQFRETE'
    end
    object FloatField102: TFloatField
      FieldName = 'PED_ALIQSEGURO'
    end
    object StringField157: TStringField
      FieldName = 'PED_TIPOFRETE'
      Size = 1
    end
    object StringField158: TStringField
      FieldName = 'PED_OBS'
      Size = 40
    end
    object DateTimeField26: TDateTimeField
      FieldName = 'PED_DATADIGI'
    end
    object StringField159: TStringField
      FieldName = 'PED_PEDCLIE'
      Size = 9
    end
    object StringField160: TStringField
      FieldName = 'PED_PEDREPRE'
      Size = 9
    end
    object FloatField103: TFloatField
      FieldName = 'PED_VALOR'
    end
    object FloatField104: TFloatField
      FieldName = 'PED_TOTALPROD'
    end
    object FloatField105: TFloatField
      FieldName = 'PED_QTDEEMB'
    end
    object FloatField106: TFloatField
      FieldName = 'PED_PESOLIQ'
    end
    object FloatField107: TFloatField
      FieldName = 'PED_PESOBRU'
    end
    object FloatField108: TFloatField
      FieldName = 'PED_NUMPGTOS'
    end
    object FloatField109: TFloatField
      FieldName = 'PED_PRAZOMEDIO'
    end
    object StringField161: TStringField
      FieldName = 'PED_LIBERADO'
      Size = 1
    end
    object StringField162: TStringField
      FieldName = 'PED_CONFERIDO'
      Size = 1
    end
    object DateTimeField27: TDateTimeField
      FieldName = 'PED_ULTALTERACAO'
    end
    object StringField163: TStringField
      FieldName = 'PED_SITUACAO'
      Size = 1
    end
    object FloatField110: TFloatField
      FieldName = 'PED_ALIQDESC'
    end
    object FloatField111: TFloatField
      FieldName = 'PED_DESCONTO'
    end
    object DateTimeField28: TDateTimeField
      FieldName = 'PED_DATACANC'
    end
    object StringField164: TStringField
      FieldName = 'BKP_PEDIDO'
      Size = 9
    end
    object StringField165: TStringField
      FieldName = 'Representante'
      ReadOnly = True
      Size = 40
    end
    object StringField166: TStringField
      FieldName = 'Divisao'
      ReadOnly = True
    end
    object StringField167: TStringField
      FieldName = 'Transportadora'
      ReadOnly = True
      Size = 40
    end
    object StringField168: TStringField
      FieldName = 'Regra'
      ReadOnly = True
      Size = 40
    end
    object cdsPedCancMotivo: TStringField
      FieldName = 'Motivo'
      ReadOnly = True
    end
  end
  object dtsPedCanc: TDataSource
    DataSet = cdsPedCanc
    Left = 321
    Top = 213
  end
  object dtsItemPedCanc: TDataSource
    DataSet = tqItemPedCanc
    Left = 321
    Top = 241
  end
  object tqItemPedCanc: TQuery
    DatabaseName = 'industrial'
    DataSource = dtsPedCanc
    SQL.Strings = (
      'Select * from itemPedVenda'
      'where Ped_Numero = :Ped_Numero')
    Left = 293
    Top = 241
    ParamData = <
      item
        DataType = ftString
        Name = 'PED_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end>
    object StringField169: TStringField
      FieldName = 'PED_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PED_NUMERO'
      Size = 9
    end
    object StringField170: TStringField
      FieldName = 'PED_ITEM'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PED_ITEM'
      Size = 2
    end
    object StringField171: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.NOTA_SERIE'
      Size = 3
    end
    object StringField172: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.NOTA_NUMERO'
      Size = 9
    end
    object StringField173: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ENT_CODIGO'
      Size = 5
    end
    object StringField174: TStringField
      FieldName = 'ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITNV_ITEM'
      Size = 2
    end
    object StringField175: TStringField
      FieldName = 'PRO_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.PRO_CODIGO'
      Size = 15
    end
    object StringField176: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.EMP_CODIGO'
      Size = 3
    end
    object StringField177: TStringField
      FieldName = 'ORD_NUMERO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ORD_NUMERO'
      Size = 6
    end
    object FloatField112: TFloatField
      FieldName = 'ITPV_QUANTIDADE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_QUANTIDADE'
    end
    object FloatField113: TFloatField
      FieldName = 'ITPV_VALORUNIT'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_VALORUNIT'
    end
    object FloatField114: TFloatField
      FieldName = 'ITPV_ALIQDESC'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQDESC'
    end
    object FloatField115: TFloatField
      FieldName = 'ITPV_ALIQIPI'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQIPI'
    end
    object FloatField116: TFloatField
      FieldName = 'ITPV_COMISREP'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_COMISREP'
    end
    object FloatField117: TFloatField
      FieldName = 'ITPV_PRECOGERADO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PRECOGERADO'
    end
    object FloatField118: TFloatField
      FieldName = 'ITPV_PENDENTE'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PENDENTE'
    end
    object DateTimeField29: TDateTimeField
      FieldName = 'ITPV_PREVISAO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_PREVISAO'
    end
    object FloatField119: TFloatField
      FieldName = 'ITPV_DESC2'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC2'
    end
    object FloatField120: TFloatField
      FieldName = 'ITPV_DESC3'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC3'
    end
    object FloatField121: TFloatField
      FieldName = 'ITPV_DESC4'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC4'
    end
    object FloatField122: TFloatField
      FieldName = 'ITPV_DESC5'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_DESC5'
    end
    object FloatField123: TFloatField
      FieldName = 'ITPV_ALIQICMS'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_ALIQICMS'
    end
    object StringField178: TStringField
      FieldName = 'ICMS_CODIGO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ICMS_CODIGO'
      Size = 2
    end
    object StringField179: TStringField
      FieldName = 'ITPV_CODTRIBUTARIO'
      Origin = 'INDUSTRIAL.ITEMPEDVENDA.ITPV_CODTRIBUTARIO'
      Size = 3
    end
    object StringField180: TStringField
      FieldKind = fkLookup
      FieldName = 'Produto'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_NOME'
      KeyFields = 'PRO_CODIGO'
      Size = 40
      Lookup = True
    end
    object StringField181: TStringField
      FieldKind = fkLookup
      FieldName = 'CF'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'NBM_CODIGO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object StringField182: TStringField
      FieldKind = fkLookup
      FieldName = 'CST'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_CODTRIBUTARIO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object StringField183: TStringField
      FieldKind = fkLookup
      FieldName = 'UND'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_UNIDADE'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
  end
  object tqMotCanc: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      'Select CANP_CODIGO, CANP_DESCRICAO from MOTCANCPEDIDO')
    Left = 618
    Top = 1
    object tqMotCancCANP_CODIGO: TStringField
      FieldName = 'CANP_CODIGO'
      Origin = 'INDUSTRIAL.MOTCANCPEDIDO.CANP_CODIGO'
      Size = 3
    end
    object tqMotCancCANP_DESCRICAO: TStringField
      FieldName = 'CANP_DESCRICAO'
      Origin = 'INDUSTRIAL.MOTCANCPEDIDO.CANP_DESCRICAO'
      Size = 40
    end
  end
  object mxDbgrdExp: TmxDBGridExport
    DateFormat = 'dd/MM/yyyy'
    TimeFormat = 'hh:mm'
    DateTimeFormat = 'hh:mm dd/MM/yyyy'
    ExportType = xtExcel
    ExportTypes = [xtHTML, xtExcel, xtWord, xtTXT, xtCSV, xtTAB, xtRTF, xtDIF, xtSYLK, xtClipboard]
    ExportStyle = xsView
    HTML.CustomColors.Background = clWhite
    HTML.CustomColors.DefaultLink = clRed
    HTML.CustomColors.DefaultFontFace = 'Arial,Helvetica'
    HTML.CustomColors.VisitedLink = clAqua
    HTML.CustomColors.ActiveLink = clBlue
    HTML.CustomColors.DefaultText = clBlack
    HTML.CustomColors.TableFontColor = clBlack
    HTML.CustomColors.TableFontFace = 'Arial,Helvetica'
    HTML.CustomColors.TableBackground = 16777167
    HTML.CustomColors.TableOddBackground = clWhite
    HTML.CustomColors.HeaderBackground = 3368601
    HTML.CustomColors.HeadersFontColor = clWhite
    HTML.Options = [hoShowGridLines, hoBoldHeaders, hoAutoLink, hoOddRowColoring, hoDisplayTitle]
    HTML.Template = ctStandard
    Messages.Caption = 'Exporting DBGrid'
    Messages.CopiedToClipboard = 'Data was copied to clipboard!'
    Messages.CancelCaption = '&Cancel'
    Messages.CreatedText = 'Created:'
    Messages.DocumentFilter.HTML = 'HTML Documents'
    Messages.DocumentFilter.Excel = 'Excel Files'
    Messages.DocumentFilter.Word = 'Word Documents'
    Messages.DocumentFilter.Text = 'Text Files'
    Messages.DocumentFilter.Comma = 'CSV (Comma delimited)'
    Messages.DocumentFilter.Tab = 'Text (Tab delimited)'
    Messages.DocumentFilter.RTF = 'Rich Text Format'
    Messages.DocumentFilter.DIF = 'Data Interchange Format'
    Messages.DocumentFilter.SYLK = 'SYLK Files'
    Messages.ExportCaption = '&Export'
    Messages.ExportToFile = 'Export &to file'
    Messages.FalseText = 'False'
    Messages.Height = 80
    Messages.SaveTitle = 'Save document'
    Messages.SelectFormat = 'E&xport formats:'
    Messages.Text = 'Processing...'
    Messages.TrueText = 'True'
    Messages.Width = 300
    Messages.ViewOnly = '&View only'
    TruncateSymbol = '...'
    RowNumberFormat = '%d'
    DOC_RTF.Template = rtStandard
    DOC_RTF.Options = [roShowGridLines, roOddRowColoring]
    DOC_RTF.CustomSettings.TableBackground = 16777167
    DOC_RTF.CustomSettings.TableOddBackground = clWhite
    DOC_RTF.CustomSettings.HeaderBackground = 3368601
    DOC_RTF.CustomSettings.DefaultFont.Charset = DEFAULT_CHARSET
    DOC_RTF.CustomSettings.DefaultFont.Color = clWindowText
    DOC_RTF.CustomSettings.DefaultFont.Height = -11
    DOC_RTF.CustomSettings.DefaultFont.Name = 'MS Sans Serif'
    DOC_RTF.CustomSettings.DefaultFont.Style = []
    DOC_RTF.CustomSettings.HeaderFont.Charset = DEFAULT_CHARSET
    DOC_RTF.CustomSettings.HeaderFont.Color = clWindowText
    DOC_RTF.CustomSettings.HeaderFont.Height = -11
    DOC_RTF.CustomSettings.HeaderFont.Name = 'MS Sans Serif'
    DOC_RTF.CustomSettings.HeaderFont.Style = [fsBold]
    DOC_RTF.CustomSettings.TableFont.Charset = DEFAULT_CHARSET
    DOC_RTF.CustomSettings.TableFont.Color = clWindowText
    DOC_RTF.CustomSettings.TableFont.Height = -11
    DOC_RTF.CustomSettings.TableFont.Name = 'MS Sans Serif'
    DOC_RTF.CustomSettings.TableFont.Style = []
    DOC_RTF.CellWidth = 1400
    DOC_RTF.TopMargin = 101
    DOC_RTF.BottomMargin = 101
    DOC_RTF.LeftMargin = 461
    DOC_RTF.RightMargin = 562
    EXCEL.Options = [reSetMargins, reUseBorders]
    EXCEL.ColumnWidth = 20
    EXCEL.Protected = False
    EXCEL.Footer = '&P'
    EXCEL.DefaultFont.Charset = DEFAULT_CHARSET
    EXCEL.DefaultFont.Color = clWindowText
    EXCEL.DefaultFont.Height = -11
    EXCEL.DefaultFont.Name = 'MS Sans Serif'
    EXCEL.DefaultFont.Style = []
    EXCEL.HeaderFont.Charset = DEFAULT_CHARSET
    EXCEL.HeaderFont.Color = clWindowText
    EXCEL.HeaderFont.Height = -11
    EXCEL.HeaderFont.Name = 'MS Sans Serif'
    EXCEL.HeaderFont.Style = [fsBold]
    EXCEL.TableFont.Charset = DEFAULT_CHARSET
    EXCEL.TableFont.Color = clWindowText
    EXCEL.TableFont.Height = -11
    EXCEL.TableFont.Name = 'MS Sans Serif'
    EXCEL.TableFont.Style = []
    EXCEL.TopMargin = 0.300000000000000000
    EXCEL.BottomMargin = 0.300000000000000000
    EXCEL.LeftMargin = 0.300000000000000000
    EXCEL.RightMargin = 0.300000000000000000
    Options = [xoClipboardMessage, xoFooterLine, xoHeaderLine, xoShowExportDate, xoShowHeader, xoShowProgress, xoUseAlignments]
    Version = '2.37'
    Left = 180
    Top = 157
  end
  object dsSerasa: TDataSource
    DataSet = CDSSerasa
    Left = 740
    Top = 241
  end
  object CDSSerasa: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspSerasa'
    Left = 712
    Top = 241
    object CDSSerasaENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Size = 5
    end
    object CDSSerasaSER_CODIGO: TStringField
      FieldName = 'SER_CODIGO'
      Size = 2
    end
    object CDSSerasaSER_QTDE: TFloatField
      FieldName = 'SER_QTDE'
    end
    object CDSSerasaSER_ANOTACAO: TStringField
      FieldName = 'SER_ANOTACAO'
      Size = 100
    end
    object CDSSerasaSER_DATAINI: TDateTimeField
      FieldName = 'SER_DATAINI'
    end
    object CDSSerasaSER_DATAFIM: TDateTimeField
      FieldName = 'SER_DATAFIM'
    end
    object CDSSerasaSER_OCORRENCIA: TStringField
      FieldName = 'SER_OCORRENCIA'
      Size = 200
    end
    object CDSSerasaSER_LOCAL: TStringField
      FieldName = 'SER_LOCAL'
      Size = 200
    end
  end
  object dspSerasa: TDataSetProvider
    DataSet = tqSerasa
    Left = 684
    Top = 241
  end
  object tqSerasa: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      'Select * from SERASA')
    Left = 656
    Top = 241
    object tqSerasaENT_CODIGO: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.SERASA.ENT_CODIGO'
      Size = 5
    end
    object tqSerasaSER_CODIGO: TStringField
      FieldName = 'SER_CODIGO'
      Origin = 'INDUSTRIAL.SERASA.SER_CODIGO'
      Size = 2
    end
    object tqSerasaSER_QTDE: TFloatField
      FieldName = 'SER_QTDE'
      Origin = 'INDUSTRIAL.SERASA.SER_QTDE'
    end
    object tqSerasaSER_ANOTACAO: TStringField
      FieldName = 'SER_ANOTACAO'
      Origin = 'INDUSTRIAL.SERASA.SER_ANOTACAO'
      Size = 100
    end
    object tqSerasaSER_DATAINI: TDateTimeField
      FieldName = 'SER_DATAINI'
      Origin = 'INDUSTRIAL.SERASA.SER_DATAINI'
    end
    object tqSerasaSER_DATAFIM: TDateTimeField
      FieldName = 'SER_DATAFIM'
      Origin = 'INDUSTRIAL.SERASA.SER_DATAFIM'
    end
    object tqSerasaSER_OCORRENCIA: TStringField
      FieldName = 'SER_OCORRENCIA'
      Origin = 'INDUSTRIAL.SERASA.SER_OCORRENCIA'
      Size = 200
    end
    object tqSerasaSER_LOCAL: TStringField
      FieldName = 'SER_LOCAL'
      Origin = 'INDUSTRIAL.SERASA.SER_LOCAL'
      Size = 200
    end
  end
  object tqItNFc: TQuery
    DatabaseName = 'industrial'
    DataSource = dsNFc
    SQL.Strings = (
      'Select distinct Bkp_Pedido, I.*'
      'from ItemNotaVenda I, ItemPedVenda P, Backup_Pedido B'
      'where '
      
        '((I.Nota_Numero = P.Nota_Numero and I.Nota_Serie = P.Nota_Serie ' +
        'and '
      'I.Ent_Codigo = P.Ent_Codigo)  or '
      
        '(I.Ref_Numero = P.Nota_Numero and I.ref_Serie = P.Nota_Serie and' +
        ' '
      'I.Ent_Codigo = P.Ent_Codigo) )'
      'and (P.Ped_Numero = B.Ped_Numero and'
      'P.Ent_Codigo = B.Ent_Codigo) and '
      '((I.Nota_Numero =:Nota_Numero and I.Nota_Serie =:Nota_Serie) or'
      '(i.Ref_Numero =:Nota_Numero and i.Ref_Serie =:Nota_Serie))'
      'order by Bkp_Pedido, I.Itnv_Item')
    Left = 504
    Top = 185
    ParamData = <
      item
        DataType = ftString
        Name = 'NOTA_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end
      item
        DataType = ftString
        Name = 'NOTA_SERIE'
        ParamType = ptUnknown
        Size = 4
      end
      item
        DataType = ftString
        Name = 'Nota_Numero'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'Nota_Serie'
        ParamType = ptUnknown
      end>
    object StringField184: TStringField
      FieldName = 'BKP_PEDIDO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.NOTA_SERIE'
      Size = 9
    end
    object StringField185: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.NOTA_NUMERO'
      Size = 3
    end
    object StringField186: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ENT_CODIGO'
      Size = 9
    end
    object StringField187: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ITEM'
      Size = 5
    end
    object StringField188: TStringField
      FieldName = 'ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_SERIE'
      Size = 2
    end
    object StringField189: TStringField
      FieldName = 'REF_SERIE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_NUMERO'
      Size = 3
    end
    object StringField190: TStringField
      FieldName = 'REF_NUMERO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_ENT_CODIGO'
      Size = 9
    end
    object StringField191: TStringField
      FieldName = 'REF_ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_ITNV_ITEM'
      Size = 5
    end
    object StringField192: TStringField
      FieldName = 'REF_ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.PRO_CODIGO'
      Size = 2
    end
    object StringField193: TStringField
      FieldName = 'PRO_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.EMP_CODIGO'
      Size = 15
    end
    object StringField194: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_QUANTIDADE'
      Size = 3
    end
    object FloatField124: TFloatField
      FieldName = 'ITNV_QUANTIDADE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_VALORUNIT'
    end
    object FloatField125: TFloatField
      FieldName = 'ITNV_VALORUNIT'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQDESC'
    end
    object FloatField126: TFloatField
      FieldName = 'ITNV_ALIQDESC'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQIPI'
    end
    object FloatField127: TFloatField
      FieldName = 'ITNV_ALIQIPI'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DATAFAT'
    end
    object DateTimeField30: TDateTimeField
      FieldName = 'ITNV_DATAFAT'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_COMISREP'
    end
    object FloatField128: TFloatField
      FieldName = 'ITNV_COMISREP'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CUSTOMEDIO'
    end
    object FloatField129: TFloatField
      FieldName = 'ITNV_CUSTOMEDIO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC2'
    end
    object FloatField130: TFloatField
      FieldName = 'ITNV_DESC2'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC3'
    end
    object FloatField131: TFloatField
      FieldName = 'ITNV_DESC3'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC4'
    end
    object FloatField132: TFloatField
      FieldName = 'ITNV_DESC4'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC5'
    end
    object FloatField133: TFloatField
      FieldName = 'ITNV_DESC5'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQICMS'
    end
    object FloatField134: TFloatField
      FieldName = 'ITNV_ALIQICMS'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CST'
    end
    object StringField195: TStringField
      FieldName = 'ITNV_CST'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.CODF_CODIGO'
      Size = 3
    end
    object StringField196: TStringField
      FieldName = 'CODF_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ICMS_CODIGO'
      Size = 5
    end
    object StringField197: TStringField
      FieldName = 'ICMS_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CUSTO'
      Size = 2
    end
    object FloatField135: TFloatField
      FieldName = 'ITNV_CUSTO'
      Origin = 'INDUSTRIAL.BACKUP_PEDIDO.BKP_PEDIDO'
    end
    object StringField198: TStringField
      FieldKind = fkLookup
      FieldName = 'CF'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'NBM_CODIGO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object StringField199: TStringField
      FieldKind = fkLookup
      FieldName = 'CST'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_CODTRIBUTARIO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object StringField200: TStringField
      FieldKind = fkLookup
      FieldName = 'UND'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_UNIDADE'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object FloatField136: TFloatField
      FieldKind = fkCalculated
      FieldName = 'Tot'
      Calculated = True
    end
    object StringField201: TStringField
      FieldKind = fkLookup
      FieldName = 'produto'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_NOME'
      KeyFields = 'PRO_CODIGO'
      Size = 40
      Lookup = True
    end
  end
  object dsItNFc: TDataSource
    DataSet = tqItNFc
    Left = 532
    Top = 185
  end
  object tqNfc: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      'Select Bkp_Numero, N.*, Tran_Nome'
      'from NotaVenda N, Backup_Venda B, transportadora T'
      
        'where (N.Nota_Numero = B.Nota_Numero and N.Ent_Codigo = B.Ent_Co' +
        'digo) '
      'and N.Tran_Codigo = T.Tran_Codigo'
      'order by Bkp_Numero')
    Left = 504
    Top = 157
    object StringField202: TStringField
      FieldName = 'BKP_NUMERO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTA_SERIE'
      Size = 9
    end
    object StringField203: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTA_NUMERO'
      Size = 3
    end
    object StringField204: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.NOTAVENDA.ENT_CODIGO'
      Size = 9
    end
    object StringField205: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.EMP_CODIGO'
      Size = 5
    end
    object StringField206: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.TRAN_CODIGO'
      Size = 3
    end
    object StringField207: TStringField
      FieldName = 'TRAN_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.TRAN_CODIGO_REDESPACHO'
      Size = 3
    end
    object StringField208: TStringField
      FieldName = 'TRAN_CODIGO_REDESPACHO'
      Origin = 'INDUSTRIAL.NOTAVENDA.HIST_CODIGO'
      Size = 3
    end
    object StringField209: TStringField
      FieldName = 'HIST_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.MOE_CODIGO'
      Size = 10
    end
    object StringField210: TStringField
      FieldName = 'MOE_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.SUP_CODIGO'
      Size = 2
    end
    object StringField211: TStringField
      FieldName = 'SUP_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.REP_CODIGO'
      Size = 3
    end
    object StringField212: TStringField
      FieldName = 'REP_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.DIV_CODIGO'
      Size = 3
    end
    object StringField213: TStringField
      FieldName = 'DIV_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.CONF_CODIGO'
      Size = 2
    end
    object StringField214: TStringField
      FieldName = 'CONF_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.CODF_CODIGO'
      Size = 2
    end
    object StringField215: TStringField
      FieldName = 'CODF_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NATO_CODIGO'
      Size = 5
    end
    object StringField216: TStringField
      FieldName = 'NATO_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.REG_CODIGO'
      Size = 2
    end
    object StringField217: TStringField
      FieldName = 'REG_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_COMISREP'
      Size = 3
    end
    object FloatField137: TFloatField
      FieldName = 'NOTV_COMISREP'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_COMISSUP'
    end
    object FloatField138: TFloatField
      FieldName = 'NOTV_COMISSUP'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_OBSERVACAO'
    end
    object StringField218: TStringField
      FieldName = 'NOTV_OBSERVACAO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQIPI'
      Size = 40
    end
    object FloatField139: TFloatField
      FieldName = 'NOTV_ALIQIPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQICMS'
    end
    object FloatField140: TFloatField
      FieldName = 'NOTV_ALIQICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQICMSUBS'
    end
    object FloatField141: TFloatField
      FieldName = 'NOTV_ALIQICMSUBS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQDESCICM'
    end
    object FloatField142: TFloatField
      FieldName = 'NOTV_ALIQDESCICM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQEMB'
    end
    object FloatField143: TFloatField
      FieldName = 'NOTV_ALIQEMB'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQENC'
    end
    object FloatField144: TFloatField
      FieldName = 'NOTV_ALIQENC'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQSEGURO'
    end
    object FloatField145: TFloatField
      FieldName = 'NOTV_ALIQSEGURO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQDESCONTO'
    end
    object FloatField146: TFloatField
      FieldName = 'NOTV_ALIQDESCONTO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_FRETE'
    end
    object FloatField147: TFloatField
      FieldName = 'NOTV_FRETE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQFRETE'
    end
    object FloatField148: TFloatField
      FieldName = 'NOTV_ALIQFRETE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_TOTALPRODUTO'
    end
    object FloatField149: TFloatField
      FieldName = 'NOTV_TOTALPRODUTO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_TOTALDESCONTO'
    end
    object FloatField150: TFloatField
      FieldName = 'NOTV_TOTALDESCONTO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_EMBALAGEM'
    end
    object FloatField151: TFloatField
      FieldName = 'NOTV_EMBALAGEM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ENCARGOS'
    end
    object FloatField152: TFloatField
      FieldName = 'NOTV_ENCARGOS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_BCALIPI'
    end
    object FloatField153: TFloatField
      FieldName = 'NOTV_BCALIPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_BCALICMS'
    end
    object FloatField154: TFloatField
      FieldName = 'NOTV_BCALICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_BCALICMSUBS'
    end
    object FloatField155: TFloatField
      FieldName = 'NOTV_BCALICMSUBS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_BCALDESCICM'
    end
    object FloatField156: TFloatField
      FieldName = 'NOTV_BCALDESCICM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_SEGURO'
    end
    object FloatField157: TFloatField
      FieldName = 'NOTV_SEGURO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_IPI'
    end
    object FloatField158: TFloatField
      FieldName = 'NOTV_IPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ICMS'
    end
    object FloatField159: TFloatField
      FieldName = 'NOTV_ICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ICMSUBS'
    end
    object FloatField160: TFloatField
      FieldName = 'NOTV_ICMSUBS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DESCICM'
    end
    object FloatField161: TFloatField
      FieldName = 'NOTV_DESCICM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ISENTAIPI'
    end
    object FloatField162: TFloatField
      FieldName = 'NOTV_ISENTAIPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ISENTAICMS'
    end
    object FloatField163: TFloatField
      FieldName = 'NOTV_ISENTAICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_OUTRASIPI'
    end
    object FloatField164: TFloatField
      FieldName = 'NOTV_OUTRASIPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_OUTRASICMS'
    end
    object FloatField165: TFloatField
      FieldName = 'NOTV_OUTRASICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_VALORCONTABIL'
    end
    object FloatField166: TFloatField
      FieldName = 'NOTV_VALORCONTABIL'
      Origin = 'INDUSTRIAL.NOTAVENDA.NTOV_BCALCOMISSAOREP'
    end
    object FloatField167: TFloatField
      FieldName = 'NTOV_BCALCOMISSAOREP'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_QTDEEMB'
    end
    object FloatField168: TFloatField
      FieldName = 'NOTV_QTDEEMB'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_PESOLIQ'
    end
    object FloatField169: TFloatField
      FieldName = 'NOTV_PESOLIQ'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_PESOBRU'
    end
    object FloatField170: TFloatField
      FieldName = 'NOTV_PESOBRU'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_SITUACAOTRIB'
    end
    object StringField219: TStringField
      FieldName = 'NOTV_SITUACAOTRIB'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_CONTADEBITO'
      Size = 3
    end
    object StringField220: TStringField
      FieldName = 'NOTV_CONTADEBITO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_CONTACREDITO'
      Size = 10
    end
    object StringField221: TStringField
      FieldName = 'NOTV_CONTACREDITO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_PRAZOMEDIO'
      Size = 10
    end
    object FloatField171: TFloatField
      FieldName = 'NOTV_PRAZOMEDIO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_NUMPGTOS'
    end
    object FloatField172: TFloatField
      FieldName = 'NOTV_NUMPGTOS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_QTDEITENS'
    end
    object FloatField173: TFloatField
      FieldName = 'NOTV_QTDEITENS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ESPEMBALAGEM'
    end
    object StringField222: TStringField
      FieldName = 'NOTV_ESPEMBALAGEM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_MOTORISTA'
      Size = 10
    end
    object StringField223: TStringField
      FieldName = 'NOTV_MOTORISTA'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_VIATRANSPORTE'
      Size = 30
    end
    object StringField224: TStringField
      FieldName = 'NOTV_VIATRANSPORTE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_MARCAEMP'
      Size = 10
    end
    object StringField225: TStringField
      FieldName = 'NOTV_MARCAEMP'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_PLACAVEIC'
      Size = 14
    end
    object StringField226: TStringField
      FieldName = 'NOTV_PLACAVEIC'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DATAFAT'
      Size = 8
    end
    object DateTimeField31: TDateTimeField
      FieldName = 'NOTV_DATAFAT'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DATAENTRADA'
    end
    object DateTimeField32: TDateTimeField
      FieldName = 'NOTV_DATAENTRADA'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DATASAIDA'
    end
    object DateTimeField33: TDateTimeField
      FieldName = 'NOTV_DATASAIDA'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_HORASAIDA'
    end
    object StringField227: TStringField
      FieldName = 'NOTV_HORASAIDA'
      Origin = 'INDUSTRIAL.NOTAVENDA.CANP_CODIGO'
      Size = 8
    end
    object StringField228: TStringField
      FieldName = 'CANP_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.IMP_NOTAFISCAL'
      Size = 3
    end
    object StringField229: TStringField
      FieldName = 'IMP_NOTAFISCAL'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_MENSAGEM'
      Size = 1
    end
    object BlobField1: TBlobField
      FieldName = 'NOTV_MENSAGEM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_EMITENTE'
      Size = 1
    end
    object StringField230: TStringField
      FieldName = 'NOTV_EMITENTE'
      Origin = 'INDUSTRIAL.NOTAVENDA.CODF_CODIGO1'
      Size = 1
    end
    object StringField231: TStringField
      FieldName = 'CODF_CODIGO1'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_FRETEAUT'
      Size = 5
    end
    object FloatField174: TFloatField
      FieldName = 'NOTV_FRETEAUT'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQICMSAUT'
    end
    object FloatField175: TFloatField
      FieldName = 'NOTV_ALIQICMSAUT'
      Origin = 'INDUSTRIAL.NOTAVENDA.REG_NUMERO'
    end
    object StringField232: TStringField
      FieldName = 'REG_NUMERO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_TIPOFRETE'
      Size = 12
    end
    object StringField233: TStringField
      FieldName = 'NOTV_TIPOFRETE'
      Origin = 'INDUSTRIAL.BACKUP_VENDA.BKP_NUMERO'
      Size = 1
    end
    object StringField234: TStringField
      FieldName = 'TRAN_NOME'
      Origin = 'INDUSTRIAL.TRANSPORTADORA.TRAN_NOME'
      Size = 40
    end
    object StringField235: TStringField
      FieldKind = fkLookup
      FieldName = 'Representante'
      LookupDataSet = tqRepr
      LookupKeyFields = 'REP_CODIGO'
      LookupResultField = 'REP_NOME'
      KeyFields = 'REP_CODIGO'
      Size = 40
      Lookup = True
    end
    object StringField236: TStringField
      FieldKind = fkLookup
      FieldName = 'Divisao'
      LookupDataSet = tqDivisao
      LookupKeyFields = 'DIV_CODIGO'
      LookupResultField = 'DIV_DESCRICAO'
      KeyFields = 'DIV_CODIGO'
      Lookup = True
    end
  end
  object dspNFc: TDataSetProvider
    DataSet = tqNfc
    Left = 532
    Top = 157
  end
  object cdsNfc: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspNFc'
    Left = 560
    Top = 157
    object StringField237: TStringField
      FieldName = 'BKP_NUMERO'
      Size = 9
    end
    object StringField238: TStringField
      FieldName = 'NOTA_SERIE'
      Size = 3
    end
    object StringField239: TStringField
      FieldName = 'NOTA_NUMERO'
      Size = 9
    end
    object StringField240: TStringField
      FieldName = 'ENT_CODIGO'
      Size = 5
    end
    object StringField241: TStringField
      FieldName = 'EMP_CODIGO'
      Size = 3
    end
    object StringField242: TStringField
      FieldName = 'TRAN_CODIGO'
      Size = 3
    end
    object StringField243: TStringField
      FieldName = 'TRAN_CODIGO_REDESPACHO'
      Size = 3
    end
    object StringField244: TStringField
      FieldName = 'HIST_CODIGO'
      Size = 10
    end
    object StringField245: TStringField
      FieldName = 'MOE_CODIGO'
      Size = 2
    end
    object StringField246: TStringField
      FieldName = 'SUP_CODIGO'
      Size = 3
    end
    object StringField247: TStringField
      FieldName = 'REP_CODIGO'
      Size = 3
    end
    object StringField248: TStringField
      FieldName = 'DIV_CODIGO'
      Size = 2
    end
    object StringField249: TStringField
      FieldName = 'CONF_CODIGO'
      Size = 2
    end
    object StringField250: TStringField
      FieldName = 'CODF_CODIGO'
      Size = 5
    end
    object StringField251: TStringField
      FieldName = 'NATO_CODIGO'
      Size = 2
    end
    object StringField252: TStringField
      FieldName = 'REG_CODIGO'
      Size = 3
    end
    object FloatField176: TFloatField
      FieldName = 'NOTV_COMISREP'
    end
    object FloatField177: TFloatField
      FieldName = 'NOTV_COMISSUP'
    end
    object StringField253: TStringField
      FieldName = 'NOTV_OBSERVACAO'
      Size = 40
    end
    object FloatField178: TFloatField
      FieldName = 'NOTV_ALIQIPI'
    end
    object FloatField179: TFloatField
      FieldName = 'NOTV_ALIQICMS'
    end
    object FloatField180: TFloatField
      FieldName = 'NOTV_ALIQICMSUBS'
    end
    object FloatField181: TFloatField
      FieldName = 'NOTV_ALIQDESCICM'
    end
    object FloatField182: TFloatField
      FieldName = 'NOTV_ALIQEMB'
    end
    object FloatField183: TFloatField
      FieldName = 'NOTV_ALIQENC'
    end
    object FloatField184: TFloatField
      FieldName = 'NOTV_ALIQSEGURO'
    end
    object FloatField185: TFloatField
      FieldName = 'NOTV_ALIQDESCONTO'
    end
    object FloatField186: TFloatField
      FieldName = 'NOTV_FRETE'
    end
    object FloatField187: TFloatField
      FieldName = 'NOTV_ALIQFRETE'
    end
    object FloatField188: TFloatField
      FieldName = 'NOTV_TOTALPRODUTO'
    end
    object FloatField189: TFloatField
      FieldName = 'NOTV_TOTALDESCONTO'
    end
    object FloatField190: TFloatField
      FieldName = 'NOTV_EMBALAGEM'
    end
    object FloatField191: TFloatField
      FieldName = 'NOTV_ENCARGOS'
    end
    object FloatField192: TFloatField
      FieldName = 'NOTV_BCALIPI'
    end
    object FloatField193: TFloatField
      FieldName = 'NOTV_BCALICMS'
    end
    object FloatField194: TFloatField
      FieldName = 'NOTV_BCALICMSUBS'
    end
    object FloatField195: TFloatField
      FieldName = 'NOTV_BCALDESCICM'
    end
    object FloatField196: TFloatField
      FieldName = 'NOTV_SEGURO'
    end
    object FloatField197: TFloatField
      FieldName = 'NOTV_IPI'
    end
    object FloatField198: TFloatField
      FieldName = 'NOTV_ICMS'
    end
    object FloatField199: TFloatField
      FieldName = 'NOTV_ICMSUBS'
    end
    object FloatField200: TFloatField
      FieldName = 'NOTV_DESCICM'
    end
    object FloatField201: TFloatField
      FieldName = 'NOTV_ISENTAIPI'
    end
    object FloatField202: TFloatField
      FieldName = 'NOTV_ISENTAICMS'
    end
    object FloatField203: TFloatField
      FieldName = 'NOTV_OUTRASIPI'
    end
    object FloatField204: TFloatField
      FieldName = 'NOTV_OUTRASICMS'
    end
    object FloatField205: TFloatField
      FieldName = 'NOTV_VALORCONTABIL'
    end
    object FloatField206: TFloatField
      FieldName = 'NTOV_BCALCOMISSAOREP'
    end
    object FloatField207: TFloatField
      FieldName = 'NOTV_QTDEEMB'
    end
    object FloatField208: TFloatField
      FieldName = 'NOTV_PESOLIQ'
    end
    object FloatField209: TFloatField
      FieldName = 'NOTV_PESOBRU'
    end
    object StringField254: TStringField
      FieldName = 'NOTV_SITUACAOTRIB'
      Size = 3
    end
    object StringField255: TStringField
      FieldName = 'NOTV_CONTADEBITO'
      Size = 10
    end
    object StringField256: TStringField
      FieldName = 'NOTV_CONTACREDITO'
      Size = 10
    end
    object FloatField210: TFloatField
      FieldName = 'NOTV_PRAZOMEDIO'
    end
    object FloatField211: TFloatField
      FieldName = 'NOTV_NUMPGTOS'
    end
    object FloatField212: TFloatField
      FieldName = 'NOTV_QTDEITENS'
    end
    object StringField257: TStringField
      FieldName = 'NOTV_ESPEMBALAGEM'
      Size = 10
    end
    object StringField258: TStringField
      FieldName = 'NOTV_MOTORISTA'
      Size = 30
    end
    object StringField259: TStringField
      FieldName = 'NOTV_VIATRANSPORTE'
      Size = 10
    end
    object StringField260: TStringField
      FieldName = 'NOTV_MARCAEMP'
      Size = 14
    end
    object StringField261: TStringField
      FieldName = 'NOTV_PLACAVEIC'
      Size = 8
    end
    object DateTimeField34: TDateTimeField
      FieldName = 'NOTV_DATAFAT'
    end
    object DateTimeField35: TDateTimeField
      FieldName = 'NOTV_DATAENTRADA'
    end
    object DateTimeField36: TDateTimeField
      FieldName = 'NOTV_DATASAIDA'
    end
    object StringField262: TStringField
      FieldName = 'NOTV_HORASAIDA'
      Size = 8
    end
    object StringField263: TStringField
      FieldName = 'CANP_CODIGO'
      Size = 3
    end
    object StringField264: TStringField
      FieldName = 'IMP_NOTAFISCAL'
      Size = 1
    end
    object BlobField2: TBlobField
      FieldName = 'NOTV_MENSAGEM'
      Size = 1
    end
    object StringField265: TStringField
      FieldName = 'NOTV_EMITENTE'
      Size = 1
    end
    object StringField266: TStringField
      FieldName = 'CODF_CODIGO1'
      Size = 5
    end
    object FloatField213: TFloatField
      FieldName = 'NOTV_FRETEAUT'
    end
    object FloatField214: TFloatField
      FieldName = 'NOTV_ALIQICMSAUT'
    end
    object StringField267: TStringField
      FieldName = 'REG_NUMERO'
      Size = 12
    end
    object StringField268: TStringField
      FieldName = 'NOTV_TIPOFRETE'
      Size = 1
    end
    object StringField269: TStringField
      FieldName = 'TRAN_NOME'
      Size = 40
    end
    object StringField270: TStringField
      FieldName = 'Representante'
      ReadOnly = True
      Size = 40
    end
    object StringField271: TStringField
      FieldName = 'Divisao'
      ReadOnly = True
    end
  end
  object dsNFc: TDataSource
    DataSet = cdsNfc
    Left = 588
    Top = 157
  end
  object tqNFD: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      'Select Bkp_Numero, N.*, Tran_Nome'
      'from NotaVenda N, Backup_Venda B, transportadora T'
      
        'where (N.Nota_Numero = B.Nota_Numero and N.Ent_Codigo = B.Ent_Co' +
        'digo) '
      'and N.Tran_Codigo = T.Tran_Codigo'
      'order by Bkp_Numero')
    Left = 504
    Top = 213
    object StringField272: TStringField
      FieldName = 'BKP_NUMERO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTA_SERIE'
      Size = 9
    end
    object StringField273: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTA_NUMERO'
      Size = 3
    end
    object StringField274: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.NOTAVENDA.ENT_CODIGO'
      Size = 9
    end
    object StringField275: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.EMP_CODIGO'
      Size = 5
    end
    object StringField276: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.TRAN_CODIGO'
      Size = 3
    end
    object StringField277: TStringField
      FieldName = 'TRAN_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.TRAN_CODIGO_REDESPACHO'
      Size = 3
    end
    object StringField278: TStringField
      FieldName = 'TRAN_CODIGO_REDESPACHO'
      Origin = 'INDUSTRIAL.NOTAVENDA.HIST_CODIGO'
      Size = 3
    end
    object StringField279: TStringField
      FieldName = 'HIST_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.MOE_CODIGO'
      Size = 10
    end
    object StringField280: TStringField
      FieldName = 'MOE_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.SUP_CODIGO'
      Size = 2
    end
    object StringField281: TStringField
      FieldName = 'SUP_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.REP_CODIGO'
      Size = 3
    end
    object StringField282: TStringField
      FieldName = 'REP_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.DIV_CODIGO'
      Size = 3
    end
    object StringField283: TStringField
      FieldName = 'DIV_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.CONF_CODIGO'
      Size = 2
    end
    object StringField284: TStringField
      FieldName = 'CONF_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.CODF_CODIGO'
      Size = 2
    end
    object StringField285: TStringField
      FieldName = 'CODF_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NATO_CODIGO'
      Size = 5
    end
    object StringField286: TStringField
      FieldName = 'NATO_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.REG_CODIGO'
      Size = 2
    end
    object StringField287: TStringField
      FieldName = 'REG_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_COMISREP'
      Size = 3
    end
    object FloatField215: TFloatField
      FieldName = 'NOTV_COMISREP'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_COMISSUP'
    end
    object FloatField216: TFloatField
      FieldName = 'NOTV_COMISSUP'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_OBSERVACAO'
    end
    object StringField288: TStringField
      FieldName = 'NOTV_OBSERVACAO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQIPI'
      Size = 40
    end
    object FloatField217: TFloatField
      FieldName = 'NOTV_ALIQIPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQICMS'
    end
    object FloatField218: TFloatField
      FieldName = 'NOTV_ALIQICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQICMSUBS'
    end
    object FloatField219: TFloatField
      FieldName = 'NOTV_ALIQICMSUBS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQDESCICM'
    end
    object FloatField220: TFloatField
      FieldName = 'NOTV_ALIQDESCICM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQEMB'
    end
    object FloatField221: TFloatField
      FieldName = 'NOTV_ALIQEMB'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQENC'
    end
    object FloatField222: TFloatField
      FieldName = 'NOTV_ALIQENC'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQSEGURO'
    end
    object FloatField223: TFloatField
      FieldName = 'NOTV_ALIQSEGURO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQDESCONTO'
    end
    object FloatField224: TFloatField
      FieldName = 'NOTV_ALIQDESCONTO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_FRETE'
    end
    object FloatField225: TFloatField
      FieldName = 'NOTV_FRETE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQFRETE'
    end
    object FloatField226: TFloatField
      FieldName = 'NOTV_ALIQFRETE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_TOTALPRODUTO'
    end
    object FloatField227: TFloatField
      FieldName = 'NOTV_TOTALPRODUTO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_TOTALDESCONTO'
    end
    object FloatField228: TFloatField
      FieldName = 'NOTV_TOTALDESCONTO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_EMBALAGEM'
    end
    object FloatField229: TFloatField
      FieldName = 'NOTV_EMBALAGEM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ENCARGOS'
    end
    object FloatField230: TFloatField
      FieldName = 'NOTV_ENCARGOS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_BCALIPI'
    end
    object FloatField231: TFloatField
      FieldName = 'NOTV_BCALIPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_BCALICMS'
    end
    object FloatField232: TFloatField
      FieldName = 'NOTV_BCALICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_BCALICMSUBS'
    end
    object FloatField233: TFloatField
      FieldName = 'NOTV_BCALICMSUBS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_BCALDESCICM'
    end
    object FloatField234: TFloatField
      FieldName = 'NOTV_BCALDESCICM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_SEGURO'
    end
    object FloatField235: TFloatField
      FieldName = 'NOTV_SEGURO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_IPI'
    end
    object FloatField236: TFloatField
      FieldName = 'NOTV_IPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ICMS'
    end
    object FloatField237: TFloatField
      FieldName = 'NOTV_ICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ICMSUBS'
    end
    object FloatField238: TFloatField
      FieldName = 'NOTV_ICMSUBS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DESCICM'
    end
    object FloatField239: TFloatField
      FieldName = 'NOTV_DESCICM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ISENTAIPI'
    end
    object FloatField240: TFloatField
      FieldName = 'NOTV_ISENTAIPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ISENTAICMS'
    end
    object FloatField241: TFloatField
      FieldName = 'NOTV_ISENTAICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_OUTRASIPI'
    end
    object FloatField242: TFloatField
      FieldName = 'NOTV_OUTRASIPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_OUTRASICMS'
    end
    object FloatField243: TFloatField
      FieldName = 'NOTV_OUTRASICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_VALORCONTABIL'
    end
    object FloatField244: TFloatField
      FieldName = 'NOTV_VALORCONTABIL'
      Origin = 'INDUSTRIAL.NOTAVENDA.NTOV_BCALCOMISSAOREP'
    end
    object FloatField245: TFloatField
      FieldName = 'NTOV_BCALCOMISSAOREP'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_QTDEEMB'
    end
    object FloatField246: TFloatField
      FieldName = 'NOTV_QTDEEMB'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_PESOLIQ'
    end
    object FloatField247: TFloatField
      FieldName = 'NOTV_PESOLIQ'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_PESOBRU'
    end
    object FloatField248: TFloatField
      FieldName = 'NOTV_PESOBRU'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_SITUACAOTRIB'
    end
    object StringField289: TStringField
      FieldName = 'NOTV_SITUACAOTRIB'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_CONTADEBITO'
      Size = 3
    end
    object StringField290: TStringField
      FieldName = 'NOTV_CONTADEBITO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_CONTACREDITO'
      Size = 10
    end
    object StringField291: TStringField
      FieldName = 'NOTV_CONTACREDITO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_PRAZOMEDIO'
      Size = 10
    end
    object FloatField249: TFloatField
      FieldName = 'NOTV_PRAZOMEDIO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_NUMPGTOS'
    end
    object FloatField250: TFloatField
      FieldName = 'NOTV_NUMPGTOS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_QTDEITENS'
    end
    object FloatField251: TFloatField
      FieldName = 'NOTV_QTDEITENS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ESPEMBALAGEM'
    end
    object StringField292: TStringField
      FieldName = 'NOTV_ESPEMBALAGEM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_MOTORISTA'
      Size = 10
    end
    object StringField293: TStringField
      FieldName = 'NOTV_MOTORISTA'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_VIATRANSPORTE'
      Size = 30
    end
    object StringField294: TStringField
      FieldName = 'NOTV_VIATRANSPORTE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_MARCAEMP'
      Size = 10
    end
    object StringField295: TStringField
      FieldName = 'NOTV_MARCAEMP'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_PLACAVEIC'
      Size = 14
    end
    object StringField296: TStringField
      FieldName = 'NOTV_PLACAVEIC'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DATAFAT'
      Size = 8
    end
    object DateTimeField37: TDateTimeField
      FieldName = 'NOTV_DATAFAT'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DATAENTRADA'
    end
    object DateTimeField38: TDateTimeField
      FieldName = 'NOTV_DATAENTRADA'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DATASAIDA'
    end
    object DateTimeField39: TDateTimeField
      FieldName = 'NOTV_DATASAIDA'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_HORASAIDA'
    end
    object StringField297: TStringField
      FieldName = 'NOTV_HORASAIDA'
      Origin = 'INDUSTRIAL.NOTAVENDA.CANP_CODIGO'
      Size = 8
    end
    object StringField298: TStringField
      FieldName = 'CANP_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.IMP_NOTAFISCAL'
      Size = 3
    end
    object StringField299: TStringField
      FieldName = 'IMP_NOTAFISCAL'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_MENSAGEM'
      Size = 1
    end
    object StringField300: TStringField
      FieldName = 'NOTV_EMITENTE'
      Origin = 'INDUSTRIAL.NOTAVENDA.CODF_CODIGO1'
      Size = 1
    end
    object StringField301: TStringField
      FieldName = 'CODF_CODIGO1'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_FRETEAUT'
      Size = 5
    end
    object FloatField252: TFloatField
      FieldName = 'NOTV_FRETEAUT'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQICMSAUT'
    end
    object FloatField253: TFloatField
      FieldName = 'NOTV_ALIQICMSAUT'
      Origin = 'INDUSTRIAL.NOTAVENDA.REG_NUMERO'
    end
    object StringField302: TStringField
      FieldName = 'REG_NUMERO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_TIPOFRETE'
      Size = 12
    end
    object StringField303: TStringField
      FieldName = 'NOTV_TIPOFRETE'
      Origin = 'INDUSTRIAL.BACKUP_VENDA.BKP_NUMERO'
      Size = 1
    end
    object StringField304: TStringField
      FieldName = 'TRAN_NOME'
      Origin = 'INDUSTRIAL.TRANSPORTADORA.TRAN_NOME'
      Size = 40
    end
    object StringField305: TStringField
      FieldKind = fkLookup
      FieldName = 'Representante'
      LookupDataSet = tqRepr
      LookupKeyFields = 'REP_CODIGO'
      LookupResultField = 'REP_NOME'
      KeyFields = 'REP_CODIGO'
      Size = 40
      Lookup = True
    end
    object StringField306: TStringField
      FieldKind = fkLookup
      FieldName = 'Divisao'
      LookupDataSet = tqDivisao
      LookupKeyFields = 'DIV_CODIGO'
      LookupResultField = 'DIV_DESCRICAO'
      KeyFields = 'DIV_CODIGO'
      Lookup = True
    end
  end
  object dspNFD: TDataSetProvider
    DataSet = tqNFD
    Left = 532
    Top = 213
  end
  object cdsNFD: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspNFD'
    Left = 560
    Top = 213
    object StringField307: TStringField
      FieldName = 'BKP_NUMERO'
      Size = 9
    end
    object StringField308: TStringField
      FieldName = 'NOTA_SERIE'
      Size = 3
    end
    object StringField309: TStringField
      FieldName = 'NOTA_NUMERO'
      Size = 9
    end
    object StringField310: TStringField
      FieldName = 'ENT_CODIGO'
      Size = 5
    end
    object StringField311: TStringField
      FieldName = 'EMP_CODIGO'
      Size = 3
    end
    object StringField312: TStringField
      FieldName = 'TRAN_CODIGO'
      Size = 3
    end
    object StringField313: TStringField
      FieldName = 'TRAN_CODIGO_REDESPACHO'
      Size = 3
    end
    object StringField314: TStringField
      FieldName = 'HIST_CODIGO'
      Size = 10
    end
    object StringField315: TStringField
      FieldName = 'MOE_CODIGO'
      Size = 2
    end
    object StringField316: TStringField
      FieldName = 'SUP_CODIGO'
      Size = 3
    end
    object StringField317: TStringField
      FieldName = 'REP_CODIGO'
      Size = 3
    end
    object StringField318: TStringField
      FieldName = 'DIV_CODIGO'
      Size = 2
    end
    object StringField319: TStringField
      FieldName = 'CONF_CODIGO'
      Size = 2
    end
    object StringField320: TStringField
      FieldName = 'CODF_CODIGO'
      Size = 5
    end
    object StringField321: TStringField
      FieldName = 'NATO_CODIGO'
      Size = 2
    end
    object StringField322: TStringField
      FieldName = 'REG_CODIGO'
      Size = 3
    end
    object FloatField254: TFloatField
      FieldName = 'NOTV_COMISREP'
    end
    object FloatField255: TFloatField
      FieldName = 'NOTV_COMISSUP'
    end
    object StringField323: TStringField
      FieldName = 'NOTV_OBSERVACAO'
      Size = 40
    end
    object FloatField256: TFloatField
      FieldName = 'NOTV_ALIQIPI'
    end
    object FloatField257: TFloatField
      FieldName = 'NOTV_ALIQICMS'
    end
    object FloatField258: TFloatField
      FieldName = 'NOTV_ALIQICMSUBS'
    end
    object FloatField259: TFloatField
      FieldName = 'NOTV_ALIQDESCICM'
    end
    object FloatField260: TFloatField
      FieldName = 'NOTV_ALIQEMB'
    end
    object FloatField261: TFloatField
      FieldName = 'NOTV_ALIQENC'
    end
    object FloatField262: TFloatField
      FieldName = 'NOTV_ALIQSEGURO'
    end
    object FloatField263: TFloatField
      FieldName = 'NOTV_ALIQDESCONTO'
    end
    object FloatField264: TFloatField
      FieldName = 'NOTV_FRETE'
    end
    object FloatField265: TFloatField
      FieldName = 'NOTV_ALIQFRETE'
    end
    object FloatField266: TFloatField
      FieldName = 'NOTV_TOTALPRODUTO'
    end
    object FloatField267: TFloatField
      FieldName = 'NOTV_TOTALDESCONTO'
    end
    object FloatField268: TFloatField
      FieldName = 'NOTV_EMBALAGEM'
    end
    object FloatField269: TFloatField
      FieldName = 'NOTV_ENCARGOS'
    end
    object FloatField270: TFloatField
      FieldName = 'NOTV_BCALIPI'
    end
    object FloatField271: TFloatField
      FieldName = 'NOTV_BCALICMS'
    end
    object FloatField272: TFloatField
      FieldName = 'NOTV_BCALICMSUBS'
    end
    object FloatField273: TFloatField
      FieldName = 'NOTV_BCALDESCICM'
    end
    object FloatField274: TFloatField
      FieldName = 'NOTV_SEGURO'
    end
    object FloatField275: TFloatField
      FieldName = 'NOTV_IPI'
    end
    object FloatField276: TFloatField
      FieldName = 'NOTV_ICMS'
    end
    object FloatField277: TFloatField
      FieldName = 'NOTV_ICMSUBS'
    end
    object FloatField278: TFloatField
      FieldName = 'NOTV_DESCICM'
    end
    object FloatField279: TFloatField
      FieldName = 'NOTV_ISENTAIPI'
    end
    object FloatField280: TFloatField
      FieldName = 'NOTV_ISENTAICMS'
    end
    object FloatField281: TFloatField
      FieldName = 'NOTV_OUTRASIPI'
    end
    object FloatField282: TFloatField
      FieldName = 'NOTV_OUTRASICMS'
    end
    object FloatField283: TFloatField
      FieldName = 'NOTV_VALORCONTABIL'
    end
    object FloatField284: TFloatField
      FieldName = 'NTOV_BCALCOMISSAOREP'
    end
    object FloatField285: TFloatField
      FieldName = 'NOTV_QTDEEMB'
    end
    object FloatField286: TFloatField
      FieldName = 'NOTV_PESOLIQ'
    end
    object FloatField287: TFloatField
      FieldName = 'NOTV_PESOBRU'
    end
    object StringField324: TStringField
      FieldName = 'NOTV_SITUACAOTRIB'
      Size = 3
    end
    object StringField325: TStringField
      FieldName = 'NOTV_CONTADEBITO'
      Size = 10
    end
    object StringField326: TStringField
      FieldName = 'NOTV_CONTACREDITO'
      Size = 10
    end
    object FloatField288: TFloatField
      FieldName = 'NOTV_PRAZOMEDIO'
    end
    object FloatField289: TFloatField
      FieldName = 'NOTV_NUMPGTOS'
    end
    object FloatField290: TFloatField
      FieldName = 'NOTV_QTDEITENS'
    end
    object StringField327: TStringField
      FieldName = 'NOTV_ESPEMBALAGEM'
      Size = 10
    end
    object StringField328: TStringField
      FieldName = 'NOTV_MOTORISTA'
      Size = 30
    end
    object StringField329: TStringField
      FieldName = 'NOTV_VIATRANSPORTE'
      Size = 10
    end
    object StringField330: TStringField
      FieldName = 'NOTV_MARCAEMP'
      Size = 14
    end
    object StringField331: TStringField
      FieldName = 'NOTV_PLACAVEIC'
      Size = 8
    end
    object DateTimeField40: TDateTimeField
      FieldName = 'NOTV_DATAFAT'
    end
    object DateTimeField41: TDateTimeField
      FieldName = 'NOTV_DATAENTRADA'
    end
    object DateTimeField42: TDateTimeField
      FieldName = 'NOTV_DATASAIDA'
    end
    object StringField332: TStringField
      FieldName = 'NOTV_HORASAIDA'
      Size = 8
    end
    object StringField333: TStringField
      FieldName = 'CANP_CODIGO'
      Size = 3
    end
    object StringField334: TStringField
      FieldName = 'IMP_NOTAFISCAL'
      Size = 1
    end
    object StringField335: TStringField
      FieldName = 'NOTV_EMITENTE'
      Size = 1
    end
    object StringField336: TStringField
      FieldName = 'CODF_CODIGO1'
      Size = 5
    end
    object FloatField291: TFloatField
      FieldName = 'NOTV_FRETEAUT'
    end
    object FloatField292: TFloatField
      FieldName = 'NOTV_ALIQICMSAUT'
    end
    object StringField337: TStringField
      FieldName = 'REG_NUMERO'
      Size = 12
    end
    object StringField338: TStringField
      FieldName = 'NOTV_TIPOFRETE'
      Size = 1
    end
    object StringField339: TStringField
      FieldName = 'TRAN_NOME'
      Size = 40
    end
    object StringField340: TStringField
      FieldName = 'Representante'
      ReadOnly = True
      Size = 40
    end
    object StringField341: TStringField
      FieldName = 'Divisao'
      ReadOnly = True
    end
  end
  object dsNFD: TDataSource
    DataSet = cdsNFD
    Left = 588
    Top = 213
  end
  object tqItNFD: TQuery
    DatabaseName = 'industrial'
    DataSource = dsNFD
    SQL.Strings = (
      'Select distinct Bkp_Pedido, I.*'
      'from ItemNotaVenda I, ItemPedVenda P, Backup_Pedido B'
      'where '
      
        '((I.Nota_Numero = P.Nota_Numero and I.Nota_Serie = P.Nota_Serie ' +
        'and '
      'I.Ent_Codigo = P.Ent_Codigo)  or '
      
        '(I.Ref_Numero = P.Nota_Numero and I.ref_Serie = P.Nota_Serie and' +
        ' '
      'I.Ent_Codigo = P.Ent_Codigo) )'
      'and (P.Ped_Numero = B.Ped_Numero and'
      'P.Ent_Codigo = B.Ent_Codigo) and '
      '((I.Nota_Numero =:Nota_Numero and I.Nota_Serie =:Nota_Serie) or'
      '(i.Ref_Numero =:Nota_Numero and i.Ref_Serie =:Nota_Serie))'
      'order by Bkp_Pedido, I.Itnv_Item')
    Left = 504
    Top = 241
    ParamData = <
      item
        DataType = ftString
        Name = 'NOTA_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end
      item
        DataType = ftString
        Name = 'NOTA_SERIE'
        ParamType = ptUnknown
        Size = 4
      end
      item
        DataType = ftString
        Name = 'Nota_Numero'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'Nota_Serie'
        ParamType = ptUnknown
      end>
    object StringField342: TStringField
      FieldName = 'BKP_PEDIDO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.NOTA_SERIE'
      Size = 9
    end
    object StringField343: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.NOTA_NUMERO'
      Size = 3
    end
    object StringField344: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ENT_CODIGO'
      Size = 9
    end
    object StringField345: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ITEM'
      Size = 5
    end
    object StringField346: TStringField
      FieldName = 'ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_SERIE'
      Size = 2
    end
    object StringField347: TStringField
      FieldName = 'REF_SERIE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_NUMERO'
      Size = 3
    end
    object StringField348: TStringField
      FieldName = 'REF_NUMERO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_ENT_CODIGO'
      Size = 9
    end
    object StringField349: TStringField
      FieldName = 'REF_ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_ITNV_ITEM'
      Size = 5
    end
    object StringField350: TStringField
      FieldName = 'REF_ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.PRO_CODIGO'
      Size = 2
    end
    object StringField351: TStringField
      FieldName = 'PRO_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.EMP_CODIGO'
      Size = 15
    end
    object StringField352: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_QUANTIDADE'
      Size = 3
    end
    object FloatField293: TFloatField
      FieldName = 'ITNV_QUANTIDADE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_VALORUNIT'
    end
    object FloatField294: TFloatField
      FieldName = 'ITNV_VALORUNIT'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQDESC'
    end
    object FloatField295: TFloatField
      FieldName = 'ITNV_ALIQDESC'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQIPI'
    end
    object FloatField296: TFloatField
      FieldName = 'ITNV_ALIQIPI'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DATAFAT'
    end
    object DateTimeField43: TDateTimeField
      FieldName = 'ITNV_DATAFAT'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_COMISREP'
    end
    object FloatField297: TFloatField
      FieldName = 'ITNV_COMISREP'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CUSTOMEDIO'
    end
    object FloatField298: TFloatField
      FieldName = 'ITNV_CUSTOMEDIO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC2'
    end
    object FloatField299: TFloatField
      FieldName = 'ITNV_DESC2'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC3'
    end
    object FloatField300: TFloatField
      FieldName = 'ITNV_DESC3'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC4'
    end
    object FloatField301: TFloatField
      FieldName = 'ITNV_DESC4'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC5'
    end
    object FloatField302: TFloatField
      FieldName = 'ITNV_DESC5'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQICMS'
    end
    object FloatField303: TFloatField
      FieldName = 'ITNV_ALIQICMS'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CST'
    end
    object StringField353: TStringField
      FieldName = 'ITNV_CST'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.CODF_CODIGO'
      Size = 3
    end
    object StringField354: TStringField
      FieldName = 'CODF_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ICMS_CODIGO'
      Size = 5
    end
    object StringField355: TStringField
      FieldName = 'ICMS_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CUSTO'
      Size = 2
    end
    object FloatField304: TFloatField
      FieldName = 'ITNV_CUSTO'
      Origin = 'INDUSTRIAL.BACKUP_PEDIDO.BKP_PEDIDO'
    end
    object StringField356: TStringField
      FieldKind = fkLookup
      FieldName = 'CF'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'NBM_CODIGO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object StringField357: TStringField
      FieldKind = fkLookup
      FieldName = 'CST'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_CODTRIBUTARIO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object StringField358: TStringField
      FieldKind = fkLookup
      FieldName = 'UND'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_UNIDADE'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object FloatField305: TFloatField
      FieldKind = fkCalculated
      FieldName = 'Tot'
      Calculated = True
    end
    object StringField359: TStringField
      FieldKind = fkLookup
      FieldName = 'produto'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_NOME'
      KeyFields = 'PRO_CODIGO'
      Size = 40
      Lookup = True
    end
  end
  object dsItNFD: TDataSource
    DataSet = tqItNFD
    Left = 532
    Top = 241
  end
  object tqItNF2: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      'Select distinct I.*'
      ''
      'from ItemNotaVenda I'
      ''
      'where (I.Nota_Numero = :Nota_Numero and'
      '       I.Nota_Serie  = :Nota_Serie and'
      '       I.Ent_Codigo = :Ent_Codigo)'
      ''
      'order by I.Itnv_Item ')
    Left = 684
    Top = 185
    ParamData = <
      item
        DataType = ftString
        Name = 'NOTA_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end
      item
        DataType = ftString
        Name = 'NOTA_SERIE'
        ParamType = ptUnknown
        Size = 4
      end
      item
        DataType = ftString
        Name = 'Ent_Codigo'
        ParamType = ptUnknown
      end>
    object StringField361: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.NOTA_NUMERO'
      Size = 3
    end
    object StringField362: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ENT_CODIGO'
      Size = 9
    end
    object StringField363: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ITEM'
      Size = 5
    end
    object StringField364: TStringField
      FieldName = 'ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_SERIE'
      Size = 2
    end
    object StringField365: TStringField
      FieldName = 'REF_SERIE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_NUMERO'
      Size = 3
    end
    object StringField366: TStringField
      FieldName = 'REF_NUMERO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_ENT_CODIGO'
      Size = 9
    end
    object StringField367: TStringField
      FieldName = 'REF_ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_ITNV_ITEM'
      Size = 5
    end
    object StringField368: TStringField
      FieldName = 'REF_ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.PRO_CODIGO'
      Size = 2
    end
    object StringField369: TStringField
      FieldName = 'PRO_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.EMP_CODIGO'
      Size = 15
    end
    object StringField370: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_QUANTIDADE'
      Size = 3
    end
    object FloatField306: TFloatField
      FieldName = 'ITNV_QUANTIDADE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_VALORUNIT'
    end
    object FloatField307: TFloatField
      FieldName = 'ITNV_VALORUNIT'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQDESC'
    end
    object FloatField308: TFloatField
      FieldName = 'ITNV_ALIQDESC'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQIPI'
    end
    object FloatField309: TFloatField
      FieldName = 'ITNV_ALIQIPI'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DATAFAT'
    end
    object DateTimeField44: TDateTimeField
      FieldName = 'ITNV_DATAFAT'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_COMISREP'
    end
    object FloatField310: TFloatField
      FieldName = 'ITNV_COMISREP'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CUSTOMEDIO'
    end
    object FloatField311: TFloatField
      FieldName = 'ITNV_CUSTOMEDIO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC2'
    end
    object FloatField312: TFloatField
      FieldName = 'ITNV_DESC2'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC3'
    end
    object FloatField313: TFloatField
      FieldName = 'ITNV_DESC3'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC4'
    end
    object FloatField314: TFloatField
      FieldName = 'ITNV_DESC4'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC5'
    end
    object FloatField315: TFloatField
      FieldName = 'ITNV_DESC5'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQICMS'
    end
    object FloatField316: TFloatField
      FieldName = 'ITNV_ALIQICMS'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CST'
    end
    object StringField371: TStringField
      FieldName = 'ITNV_CST'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.CODF_CODIGO'
      Size = 3
    end
    object StringField372: TStringField
      FieldName = 'CODF_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ICMS_CODIGO'
      Size = 5
    end
    object StringField373: TStringField
      FieldName = 'ICMS_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CUSTO'
      Size = 2
    end
    object FloatField317: TFloatField
      FieldName = 'ITNV_CUSTO'
      Origin = 'INDUSTRIAL.BACKUP_PEDIDO.BKP_PEDIDO'
    end
    object StringField374: TStringField
      FieldKind = fkLookup
      FieldName = 'CF'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'NBM_CODIGO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object StringField375: TStringField
      FieldKind = fkLookup
      FieldName = 'CST'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_CODTRIBUTARIO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object StringField376: TStringField
      FieldKind = fkLookup
      FieldName = 'UND'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_UNIDADE'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object FloatField318: TFloatField
      FieldKind = fkCalculated
      FieldName = 'Tot'
      Calculated = True
    end
    object StringField377: TStringField
      FieldKind = fkLookup
      FieldName = 'produto'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_NOME'
      KeyFields = 'PRO_CODIGO'
      Size = 40
      Lookup = True
    end
  end
  object BACKUPtqItNF: TQuery
    DatabaseName = 'industrial'
    DataSource = dsNF
    SQL.Strings = (
      'Select distinct Bkp_Pedido, I.*'
      'from ItemNotaVenda I, ItemPedVenda P, Backup_Pedido B'
      'where '
      
        '((I.Nota_Numero = P.Nota_Numero and I.Nota_Serie = P.Nota_Serie ' +
        'and '
      'I.Ent_Codigo = P.Ent_Codigo)  or '
      
        '(I.Ref_Numero = P.Nota_Numero and I.ref_Serie = P.Nota_Serie and' +
        ' '
      'I.Ent_Codigo = P.Ent_Codigo) )'
      'and (P.Ped_Numero = B.Ped_Numero and'
      'P.Ent_Codigo = B.Ent_Codigo) and '
      '((I.Nota_Numero =:Nota_Numero and I.Nota_Serie =:Nota_Serie) or'
      '(i.Ref_Numero =:Nota_Numero and i.Ref_Serie =:Nota_Serie))'
      'order by Bkp_Pedido, I.Itnv_Item')
    Left = 740
    Top = 269
    ParamData = <
      item
        DataType = ftString
        Name = 'NOTA_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end
      item
        DataType = ftString
        Name = 'NOTA_SERIE'
        ParamType = ptUnknown
        Size = 4
      end
      item
        DataType = ftString
        Name = 'Nota_Numero'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'Nota_Serie'
        ParamType = ptUnknown
      end>
    object StringField360: TStringField
      FieldName = 'BKP_PEDIDO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.NOTA_SERIE'
      Size = 9
    end
    object StringField378: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.NOTA_NUMERO'
      Size = 3
    end
    object StringField379: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ENT_CODIGO'
      Size = 9
    end
    object StringField380: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ITEM'
      Size = 5
    end
    object StringField381: TStringField
      FieldName = 'ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_SERIE'
      Size = 2
    end
    object StringField382: TStringField
      FieldName = 'REF_SERIE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_NUMERO'
      Size = 3
    end
    object StringField383: TStringField
      FieldName = 'REF_NUMERO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_ENT_CODIGO'
      Size = 9
    end
    object StringField384: TStringField
      FieldName = 'REF_ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_ITNV_ITEM'
      Size = 5
    end
    object StringField385: TStringField
      FieldName = 'REF_ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.PRO_CODIGO'
      Size = 2
    end
    object StringField386: TStringField
      FieldName = 'PRO_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.EMP_CODIGO'
      Size = 15
    end
    object StringField387: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_QUANTIDADE'
      Size = 3
    end
    object FloatField319: TFloatField
      FieldName = 'ITNV_QUANTIDADE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_VALORUNIT'
    end
    object FloatField320: TFloatField
      FieldName = 'ITNV_VALORUNIT'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQDESC'
    end
    object FloatField321: TFloatField
      FieldName = 'ITNV_ALIQDESC'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQIPI'
    end
    object FloatField322: TFloatField
      FieldName = 'ITNV_ALIQIPI'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DATAFAT'
    end
    object DateTimeField45: TDateTimeField
      FieldName = 'ITNV_DATAFAT'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_COMISREP'
    end
    object FloatField323: TFloatField
      FieldName = 'ITNV_COMISREP'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CUSTOMEDIO'
    end
    object FloatField324: TFloatField
      FieldName = 'ITNV_CUSTOMEDIO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC2'
    end
    object FloatField325: TFloatField
      FieldName = 'ITNV_DESC2'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC3'
    end
    object FloatField326: TFloatField
      FieldName = 'ITNV_DESC3'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC4'
    end
    object FloatField327: TFloatField
      FieldName = 'ITNV_DESC4'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC5'
    end
    object FloatField328: TFloatField
      FieldName = 'ITNV_DESC5'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQICMS'
    end
    object FloatField329: TFloatField
      FieldName = 'ITNV_ALIQICMS'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CST'
    end
    object StringField388: TStringField
      FieldName = 'ITNV_CST'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.CODF_CODIGO'
      Size = 3
    end
    object StringField389: TStringField
      FieldName = 'CODF_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ICMS_CODIGO'
      Size = 5
    end
    object StringField390: TStringField
      FieldName = 'ICMS_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CUSTO'
      Size = 2
    end
    object FloatField330: TFloatField
      FieldName = 'ITNV_CUSTO'
      Origin = 'INDUSTRIAL.BACKUP_PEDIDO.BKP_PEDIDO'
    end
    object StringField391: TStringField
      FieldKind = fkLookup
      FieldName = 'CF'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'NBM_CODIGO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object StringField392: TStringField
      FieldKind = fkLookup
      FieldName = 'CST'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_CODTRIBUTARIO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object StringField393: TStringField
      FieldKind = fkLookup
      FieldName = 'UND'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_UNIDADE'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object FloatField331: TFloatField
      FieldKind = fkCalculated
      FieldName = 'Tot'
      Calculated = True
    end
    object StringField394: TStringField
      FieldKind = fkLookup
      FieldName = 'produto'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_NOME'
      KeyFields = 'PRO_CODIGO'
      Size = 40
      Lookup = True
    end
  end
  object BACKUPtqItNF2: TQuery
    DatabaseName = 'industrial'
    DataSource = dsNF
    SQL.Strings = (
      'Select distinct I.*'
      ''
      'from ItemNotaVenda I'
      ''
      'where ((I.Nota_Numero = :Nota_Numero and'
      '        I.Nota_Serie  = :Nota_Serie) or'
      '       (I.Ref_Numero  = :Nota_Numero and'
      '        I.Ref_Serie   = :Nota_Serie))'
      ''
      'order by I.Itnv_Item ')
    Left = 712
    Top = 269
    ParamData = <
      item
        DataType = ftString
        Name = 'NOTA_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end
      item
        DataType = ftString
        Name = 'NOTA_SERIE'
        ParamType = ptUnknown
        Size = 4
      end
      item
        DataType = ftString
        Name = 'Nota_Numero'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'Nota_Serie'
        ParamType = ptUnknown
      end>
    object StringField395: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.NOTA_NUMERO'
      Size = 3
    end
    object StringField396: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ENT_CODIGO'
      Size = 9
    end
    object StringField397: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ITEM'
      Size = 5
    end
    object StringField398: TStringField
      FieldName = 'ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_SERIE'
      Size = 2
    end
    object StringField399: TStringField
      FieldName = 'REF_SERIE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_NUMERO'
      Size = 3
    end
    object StringField400: TStringField
      FieldName = 'REF_NUMERO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_ENT_CODIGO'
      Size = 9
    end
    object StringField401: TStringField
      FieldName = 'REF_ENT_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.REF_ITNV_ITEM'
      Size = 5
    end
    object StringField402: TStringField
      FieldName = 'REF_ITNV_ITEM'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.PRO_CODIGO'
      Size = 2
    end
    object StringField403: TStringField
      FieldName = 'PRO_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.EMP_CODIGO'
      Size = 15
    end
    object StringField404: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_QUANTIDADE'
      Size = 3
    end
    object FloatField332: TFloatField
      FieldName = 'ITNV_QUANTIDADE'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_VALORUNIT'
    end
    object FloatField333: TFloatField
      FieldName = 'ITNV_VALORUNIT'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQDESC'
    end
    object FloatField334: TFloatField
      FieldName = 'ITNV_ALIQDESC'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQIPI'
    end
    object FloatField335: TFloatField
      FieldName = 'ITNV_ALIQIPI'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DATAFAT'
    end
    object DateTimeField46: TDateTimeField
      FieldName = 'ITNV_DATAFAT'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_COMISREP'
    end
    object FloatField336: TFloatField
      FieldName = 'ITNV_COMISREP'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CUSTOMEDIO'
    end
    object FloatField337: TFloatField
      FieldName = 'ITNV_CUSTOMEDIO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC2'
    end
    object FloatField338: TFloatField
      FieldName = 'ITNV_DESC2'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC3'
    end
    object FloatField339: TFloatField
      FieldName = 'ITNV_DESC3'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC4'
    end
    object FloatField340: TFloatField
      FieldName = 'ITNV_DESC4'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_DESC5'
    end
    object FloatField341: TFloatField
      FieldName = 'ITNV_DESC5'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_ALIQICMS'
    end
    object FloatField342: TFloatField
      FieldName = 'ITNV_ALIQICMS'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CST'
    end
    object StringField405: TStringField
      FieldName = 'ITNV_CST'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.CODF_CODIGO'
      Size = 3
    end
    object StringField406: TStringField
      FieldName = 'CODF_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ICMS_CODIGO'
      Size = 5
    end
    object StringField407: TStringField
      FieldName = 'ICMS_CODIGO'
      Origin = 'INDUSTRIAL.ITEMNOTAVENDA.ITNV_CUSTO'
      Size = 2
    end
    object FloatField343: TFloatField
      FieldName = 'ITNV_CUSTO'
      Origin = 'INDUSTRIAL.BACKUP_PEDIDO.BKP_PEDIDO'
    end
    object StringField408: TStringField
      FieldKind = fkLookup
      FieldName = 'CF'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'NBM_CODIGO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object StringField409: TStringField
      FieldKind = fkLookup
      FieldName = 'CST'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_CODTRIBUTARIO'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object StringField410: TStringField
      FieldKind = fkLookup
      FieldName = 'UND'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_UNIDADE'
      KeyFields = 'PRO_CODIGO'
      Lookup = True
    end
    object FloatField344: TFloatField
      FieldKind = fkCalculated
      FieldName = 'Tot'
      Calculated = True
    end
    object StringField411: TStringField
      FieldKind = fkLookup
      FieldName = 'produto'
      LookupDataSet = tqProd
      LookupKeyFields = 'PRO_CODIGO'
      LookupResultField = 'PRO_NOME'
      KeyFields = 'PRO_CODIGO'
      Size = 40
      Lookup = True
    end
  end
  object BACKUPtqNF: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      'Select Bkp_Numero, N.*, Tran_Nome'
      'from NotaVenda N, Backup_Venda B, transportadora T'
      
        'where (N.Nota_Numero = B.Nota_Numero and N.Ent_Codigo = B.Ent_Co' +
        'digo) '
      'and N.Tran_Codigo = T.Tran_Codigo'
      'order by Bkp_Numero')
    Left = 684
    Top = 269
    object StringField412: TStringField
      FieldName = 'BKP_NUMERO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTA_SERIE'
      Size = 9
    end
    object StringField413: TStringField
      FieldName = 'NOTA_SERIE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTA_NUMERO'
      Size = 3
    end
    object StringField414: TStringField
      FieldName = 'NOTA_NUMERO'
      Origin = 'INDUSTRIAL.NOTAVENDA.ENT_CODIGO'
      Size = 9
    end
    object StringField415: TStringField
      FieldName = 'ENT_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.EMP_CODIGO'
      Size = 5
    end
    object StringField416: TStringField
      FieldName = 'EMP_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.TRAN_CODIGO'
      Size = 3
    end
    object StringField417: TStringField
      FieldName = 'TRAN_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.TRAN_CODIGO_REDESPACHO'
      Size = 3
    end
    object StringField418: TStringField
      FieldName = 'TRAN_CODIGO_REDESPACHO'
      Origin = 'INDUSTRIAL.NOTAVENDA.HIST_CODIGO'
      Size = 3
    end
    object StringField419: TStringField
      FieldName = 'HIST_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.MOE_CODIGO'
      Size = 10
    end
    object StringField420: TStringField
      FieldName = 'MOE_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.SUP_CODIGO'
      Size = 2
    end
    object StringField421: TStringField
      FieldName = 'SUP_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.REP_CODIGO'
      Size = 3
    end
    object StringField422: TStringField
      FieldName = 'REP_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.DIV_CODIGO'
      Size = 3
    end
    object StringField423: TStringField
      FieldName = 'DIV_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.CONF_CODIGO'
      Size = 2
    end
    object StringField424: TStringField
      FieldName = 'CONF_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.CODF_CODIGO'
      Size = 2
    end
    object StringField425: TStringField
      FieldName = 'CODF_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NATO_CODIGO'
      Size = 5
    end
    object StringField426: TStringField
      FieldName = 'NATO_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.REG_CODIGO'
      Size = 2
    end
    object StringField427: TStringField
      FieldName = 'REG_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_COMISREP'
      Size = 3
    end
    object FloatField345: TFloatField
      FieldName = 'NOTV_COMISREP'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_COMISSUP'
    end
    object FloatField346: TFloatField
      FieldName = 'NOTV_COMISSUP'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_OBSERVACAO'
    end
    object StringField428: TStringField
      FieldName = 'NOTV_OBSERVACAO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQIPI'
      Size = 40
    end
    object FloatField347: TFloatField
      FieldName = 'NOTV_ALIQIPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQICMS'
    end
    object FloatField348: TFloatField
      FieldName = 'NOTV_ALIQICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQICMSUBS'
    end
    object FloatField349: TFloatField
      FieldName = 'NOTV_ALIQICMSUBS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQDESCICM'
    end
    object FloatField350: TFloatField
      FieldName = 'NOTV_ALIQDESCICM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQEMB'
    end
    object FloatField351: TFloatField
      FieldName = 'NOTV_ALIQEMB'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQENC'
    end
    object FloatField352: TFloatField
      FieldName = 'NOTV_ALIQENC'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQSEGURO'
    end
    object FloatField353: TFloatField
      FieldName = 'NOTV_ALIQSEGURO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQDESCONTO'
    end
    object FloatField354: TFloatField
      FieldName = 'NOTV_ALIQDESCONTO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_FRETE'
    end
    object FloatField355: TFloatField
      FieldName = 'NOTV_FRETE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQFRETE'
    end
    object FloatField356: TFloatField
      FieldName = 'NOTV_ALIQFRETE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_TOTALPRODUTO'
    end
    object FloatField357: TFloatField
      FieldName = 'NOTV_TOTALPRODUTO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_TOTALDESCONTO'
    end
    object FloatField358: TFloatField
      FieldName = 'NOTV_TOTALDESCONTO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_EMBALAGEM'
    end
    object FloatField359: TFloatField
      FieldName = 'NOTV_EMBALAGEM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ENCARGOS'
    end
    object FloatField360: TFloatField
      FieldName = 'NOTV_ENCARGOS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_BCALIPI'
    end
    object FloatField361: TFloatField
      FieldName = 'NOTV_BCALIPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_BCALICMS'
    end
    object FloatField362: TFloatField
      FieldName = 'NOTV_BCALICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_BCALICMSUBS'
    end
    object FloatField363: TFloatField
      FieldName = 'NOTV_BCALICMSUBS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_BCALDESCICM'
    end
    object FloatField364: TFloatField
      FieldName = 'NOTV_BCALDESCICM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_SEGURO'
    end
    object FloatField365: TFloatField
      FieldName = 'NOTV_SEGURO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_IPI'
    end
    object FloatField366: TFloatField
      FieldName = 'NOTV_IPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ICMS'
    end
    object FloatField367: TFloatField
      FieldName = 'NOTV_ICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ICMSUBS'
    end
    object FloatField368: TFloatField
      FieldName = 'NOTV_ICMSUBS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DESCICM'
    end
    object FloatField369: TFloatField
      FieldName = 'NOTV_DESCICM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ISENTAIPI'
    end
    object FloatField370: TFloatField
      FieldName = 'NOTV_ISENTAIPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ISENTAICMS'
    end
    object FloatField371: TFloatField
      FieldName = 'NOTV_ISENTAICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_OUTRASIPI'
    end
    object FloatField372: TFloatField
      FieldName = 'NOTV_OUTRASIPI'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_OUTRASICMS'
    end
    object FloatField373: TFloatField
      FieldName = 'NOTV_OUTRASICMS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_VALORCONTABIL'
    end
    object FloatField374: TFloatField
      FieldName = 'NOTV_VALORCONTABIL'
      Origin = 'INDUSTRIAL.NOTAVENDA.NTOV_BCALCOMISSAOREP'
    end
    object FloatField375: TFloatField
      FieldName = 'NTOV_BCALCOMISSAOREP'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_QTDEEMB'
    end
    object FloatField376: TFloatField
      FieldName = 'NOTV_QTDEEMB'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_PESOLIQ'
    end
    object FloatField377: TFloatField
      FieldName = 'NOTV_PESOLIQ'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_PESOBRU'
    end
    object FloatField378: TFloatField
      FieldName = 'NOTV_PESOBRU'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_SITUACAOTRIB'
    end
    object StringField429: TStringField
      FieldName = 'NOTV_SITUACAOTRIB'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_CONTADEBITO'
      Size = 3
    end
    object StringField430: TStringField
      FieldName = 'NOTV_CONTADEBITO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_CONTACREDITO'
      Size = 10
    end
    object StringField431: TStringField
      FieldName = 'NOTV_CONTACREDITO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_PRAZOMEDIO'
      Size = 10
    end
    object FloatField379: TFloatField
      FieldName = 'NOTV_PRAZOMEDIO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_NUMPGTOS'
    end
    object FloatField380: TFloatField
      FieldName = 'NOTV_NUMPGTOS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_QTDEITENS'
    end
    object FloatField381: TFloatField
      FieldName = 'NOTV_QTDEITENS'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ESPEMBALAGEM'
    end
    object StringField432: TStringField
      FieldName = 'NOTV_ESPEMBALAGEM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_MOTORISTA'
      Size = 10
    end
    object StringField433: TStringField
      FieldName = 'NOTV_MOTORISTA'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_VIATRANSPORTE'
      Size = 30
    end
    object StringField434: TStringField
      FieldName = 'NOTV_VIATRANSPORTE'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_MARCAEMP'
      Size = 10
    end
    object StringField435: TStringField
      FieldName = 'NOTV_MARCAEMP'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_PLACAVEIC'
      Size = 14
    end
    object StringField436: TStringField
      FieldName = 'NOTV_PLACAVEIC'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DATAFAT'
      Size = 8
    end
    object DateTimeField47: TDateTimeField
      FieldName = 'NOTV_DATAFAT'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DATAENTRADA'
    end
    object DateTimeField48: TDateTimeField
      FieldName = 'NOTV_DATAENTRADA'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_DATASAIDA'
    end
    object DateTimeField49: TDateTimeField
      FieldName = 'NOTV_DATASAIDA'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_HORASAIDA'
    end
    object StringField437: TStringField
      FieldName = 'NOTV_HORASAIDA'
      Origin = 'INDUSTRIAL.NOTAVENDA.CANP_CODIGO'
      Size = 8
    end
    object StringField438: TStringField
      FieldName = 'CANP_CODIGO'
      Origin = 'INDUSTRIAL.NOTAVENDA.IMP_NOTAFISCAL'
      Size = 3
    end
    object StringField439: TStringField
      FieldName = 'IMP_NOTAFISCAL'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_MENSAGEM'
      Size = 1
    end
    object BlobField3: TBlobField
      FieldName = 'NOTV_MENSAGEM'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_EMITENTE'
      Size = 1
    end
    object StringField440: TStringField
      FieldName = 'NOTV_EMITENTE'
      Origin = 'INDUSTRIAL.NOTAVENDA.CODF_CODIGO1'
      Size = 1
    end
    object StringField441: TStringField
      FieldName = 'CODF_CODIGO1'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_FRETEAUT'
      Size = 5
    end
    object FloatField382: TFloatField
      FieldName = 'NOTV_FRETEAUT'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_ALIQICMSAUT'
    end
    object FloatField383: TFloatField
      FieldName = 'NOTV_ALIQICMSAUT'
      Origin = 'INDUSTRIAL.NOTAVENDA.REG_NUMERO'
    end
    object StringField442: TStringField
      FieldName = 'REG_NUMERO'
      Origin = 'INDUSTRIAL.NOTAVENDA.NOTV_TIPOFRETE'
      Size = 12
    end
    object StringField443: TStringField
      FieldName = 'NOTV_TIPOFRETE'
      Origin = 'INDUSTRIAL.BACKUP_VENDA.BKP_NUMERO'
      Size = 1
    end
    object StringField444: TStringField
      FieldName = 'TRAN_NOME'
      Origin = 'INDUSTRIAL.TRANSPORTADORA.TRAN_NOME'
      Size = 40
    end
    object StringField445: TStringField
      FieldKind = fkLookup
      FieldName = 'Representante'
      LookupDataSet = tqRepr
      LookupKeyFields = 'REP_CODIGO'
      LookupResultField = 'REP_NOME'
      KeyFields = 'REP_CODIGO'
      Size = 40
      Lookup = True
    end
    object StringField446: TStringField
      FieldKind = fkLookup
      FieldName = 'Divisao'
      LookupDataSet = tqDivisao
      LookupKeyFields = 'DIV_CODIGO'
      LookupResultField = 'DIV_DESCRICAO'
      KeyFields = 'DIV_CODIGO'
      Lookup = True
    end
  end
  object tqTitNF2: TQuery
    DatabaseName = 'industrial'
    DataSource = dsItNF
    SQL.Strings = (
      'select  *'
      ''
      'from titcredito'
      ''
      'where ent_codigo = :ent_codigo and'
      
        '      trim(substr(Titc_Obs0, 1, instr(Titc_Obs0, '#39'-'#39') - 1)) = :n' +
        'ota_serie and'
      
        '      trim(substr(Titc_Obs0, instr(Titc_Obs0, '#39'-'#39') + 1, 10)) = :' +
        'nota_numero')
    Left = 684
    Top = 213
    ParamData = <
      item
        DataType = ftString
        Name = 'ENT_CODIGO'
        ParamType = ptUnknown
        Size = 6
      end
      item
        DataType = ftString
        Name = 'NOTA_SERIE'
        ParamType = ptUnknown
        Size = 4
      end
      item
        DataType = ftString
        Name = 'NOTA_NUMERO'
        ParamType = ptUnknown
        Size = 10
      end>
  end
  object ppMenuExporta: TPopupMenu
    Left = 220
    Top = 327
    object ExportarparaExcel1: TMenuItem
      Caption = 'Exportar para Excel'
      OnClick = ExportarparaExcel1Click
    end
  end
  object saveDLG: TJvSaveDialog
    Filter = 'Excel|*.csv'
    Height = 421
    Width = 571
    Left = 358
    Top = 206
  end
end
